R_Studio中xls数据进行统计求和
Posted 1138720556gary
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了R_Studio中xls数据进行统计求和相关的知识,希望对你有一定的参考价值。
我们发现这张xls表格是没有学生总分的,在xls文件中计算学生总分嫌麻烦时,可以考虑在R Studio中自定义R Script脚本来解决实际问题(计算每个学生的总成绩)
.xls数据表中的数据(关键信息姓名已进行涂鸦)
实现过程
读取.xls文件,先找到要读取的"综合成绩.xls"文件目录
(读取xls文件方法及出现乱码解决方法 传送门)
dat[i,]表示第i列数据
dat[,j]表示第j列数据
那么我们可以自己定义一个R Script脚本来实现sum求学生分数总合函数
sum求得总分函数
sum<- function(a){ result <- c() for(i in 1:59){ sum <- 0 for(j in 3:10){ if(!is.na(a[i,j])){ sum <- sum + as.numeric(levels(a[i,j]))[a[i,j]] } } result <- c(result,sum) } return(result) }
在R_Studio中调用一下
sum(dat)
将得到学生成绩总分加入到data表格中
dat <- data.frame(dat,sum(dat))
导出文件也很简单
write.xlsx2(dat,"Gary2.xlsx")
Gary2就是我们刚刚导出来数据存放的文件
这时可能还会有小伙伴想绘制每门课程的xx图
(main=("总成绩直方图") 忘记打了,不过没关系,提示错误还时‘x’必须为数值)
这是因为此时dat[]数据中存在有向量,我们只需要使用as.numeric()方法强转一下就可以了
hist(as.numeric(dat[,2]),main=("总成绩直方图"))
plot(as.numeric(dat[,2]),main=("总成绩散点图"))
barplot(as.numeric(dat[,2]),main=("总成绩条形图"))
pie(1:10,as.numeric(dat[,2]),main=("总成绩饼状图"))
再来个qq图
qqnorm(as.numeric(dat[,2]))
以上是关于R_Studio中xls数据进行统计求和的主要内容,如果未能解决你的问题,请参考以下文章
R_Studio(关联)对Groceries数据集进行关联分析