read.table（“文件名”，sep=“分割符号”，header=T第一行做列名rownames=1第一列为行名)
注意：csv分隔符为，txt分隔符为\t
write.table("文件名"，数据框，sep=“分隔符”,row.names=TRUE, col.names=NA)
解释：将b数据框导出为BMI.txt或BMI.csv
注意：最后row.names=TRUE, col.names=NA是为了输出数据框不错位
数据框$列名
解释提取test数据框中的height一列数据
解释：根据gender进行分组，检验组间height，数据来自数据框test
你可以利用dplyr包进行计算，假设你的数据名为：yourdatadata <- yourdata[,c("siteNO","user","check")]
library(dplyr)
by_siteNO_USER <- group_by(data,siteNO,user)
need <- summary(by_siteNO_user,
mean =mean(check),
median=median(check))
