上机题目及解析
附录数据如下:
weight height
4.17 1.75
5.58 1.8
5.18 1.65
6.11 1.9
4.5 1.74
4.61 1.91
5.17 1.75
4.53 1.8
5.33 1.65
5.14 1.9
4.81 1.74
4.17 1.91
4.41 1.75
3.59 1.8
5.87 1.65
3.83 1.9
6.03 1.74
4.89 1.91
4.32 1.75
4.69 1.8
1)先复制附录数据至文本文档,然后读取数据至文件data
# T1
setwd("C:/Users/87029/Desktop") # 设置当前工作路径
data = read.table("data.txt",header=TRUE)
data
2)比值的计算weight和height的平方的比值存入bmi变量
# T2
data$bmi = data$weight/data$height
data
3)创建对象x, 其值为1:10, 使用write函数将其写入文件x.txt;删除x, 然后再读入该文件并赋值给x,并保证x是numeric
# T3
x = 1:10
write.table(x,file="x.txt") # 写入文件
rm(x) # 移除变量x
x = read.table("x.txt") # 读取文件x.txt
x = as.numeric(x$x) # 进行numeric转换
class(x) # 确认x类型