NWAFU 生物统计实验二 R语言版

r 复制代码
#1
setwd(修改为你的工作路径或桌面路径)
feed_types <- c("A", "B", "C")
weight_gain_means <- c(36.8, 34.9, 21.3)
weight_gain_sds <- c(2.4, 2.7, 6.6)
weight_gain <- rnorm(3, mean = weight_gain_means, sd = weight_gain_sds)
food_consumption_means <- c(60.5, 56.9, 55.8)
food_consumption_sds <- c(3.1, 2.4, 1.5)
food_consumption <- rnorm(3, mean = food_consumption_means, sd = food_consumption_sds)
weight_food_ratio_means <- c(1.65, 1.64, 2.74)
weight_food_ratio_sds <- c(0.12, 0.13, 0.75)
weight_food_ratio <- rnorm(3, mean = weight_food_ratio_means, sd = weight_food_ratio_sds)
df_feed_stats <- data.frame(feed_types, weight_gain, food_consumption, weight_food_ratio)
#2
data()
df_chick <- ChickWeight
colnames(df_feed_stats)
colnames(df_chick)
df_merge <- merge(df_feed_stats, df_chick)

#3
na.fail(df_merge)
df_clean <- na.omit(df_merge)
names(df_clean)[5] <- 你的名字
library("openxlsx")
write.xlsx(df_clean, file = 你的文件名)  
#4
food_data <- df_clean$food_consumption[1:50]
food_asc <- sort(food_data)
food_desc <- sort(food_data, decreasing = TRUE)
print("升序排序后:")
print(food_asc)
print("降序排序后:")
print(food_desc)
str(df_clean)
r 复制代码
setwd(你的工作目录)
feed <- c("A", "B", "C")
weight_up <- rnorm(3, mean = c(36.8, 34.9, 21.3), sd = c(2.4, 2.7, 6.6))
food <- rnorm(3, mean = c(60.5, 56.9, 55.8), sd = c(3.1, 2.4, 1.5))
weight_food <- rnorm(3, mean = c(1.65, 1.64, 2.74), sd = c(0.12, 0.13, 0.75))
data1 <- data.frame(feed, weight_up, food, weight_food)

data()
chicken<-ChickWeight
colnames(data1)
colnames(chicken)
data2 <- merge(data1, chicken)

na.fail(data2)
data3<-na.omit(data2)
names(data3)[5]<-"你的名字"
library("openxlsx")
write.xlsx(data3, file = "你的文件名")

food_data<-data3$food[1:100]
food_data_sort <- sort(food_data)
food_data_sort
food_data_sort <- sort(food_data,decreasing = T)
food_data_sort
str(data3)
相关推荐
小白学大数据1 天前
R语言爬虫实战:如何爬取分页链接并批量保存
开发语言·爬虫·信息可视化·r语言
开开心心_Every2 天前
便捷的Office批量转PDF工具
开发语言·人工智能·r语言·pdf·c#·音视频·symfony
Chef_Chen4 天前
从0开始学习R语言--Day39--Spearman 秩相关
开发语言·学习·r语言
q567315235 天前
R语言初学者爬虫简单模板
开发语言·爬虫·r语言·iphone
shootero@126.com6 天前
R语言开发记录,二(创建R包)
r语言
shootero@126.com7 天前
R语言开发记录,一
开发语言·r语言
旷世奇才李先生7 天前
R 语言安装使用教程
开发语言·r语言
十三画者18 天前
【科研绘图系列】R语言绘制circos图形(circos plot)
数据挖掘·数据分析·r语言·数据可视化
Morpheon18 天前
使用 R 处理图像
开发语言·计算机视觉·r语言
WW、forever19 天前
服务器手动安装并编译R环境库包:PROJ→RGDAL
运维·服务器·r语言