2017-06-21 41 views
-2

但是,由于某些列缺少数据,因此我试图对列进行平均,而NA的平均结束也是如此。 有没有办法找到许多列的平均值,同时从计算中排除任何NA数据?R:对列进行平均并有条件地排除NA数据

到目前为止,我所使用的代码是:

### Calculate Bins ### 
{pulse<-transmute(pulse, Question, Type, Student,Bin1=(Rt1+ Rt2 + Rt3+ Rt4)/4 , Bin2= (Rt5+Rt6+Rt7+Rt8)/4 , Bin3= (Rt9+Rt10+Rt11)/3) 
} 

不过,我不认为这是最好的way.My目标是有器Rt1-器Rt4,RT5手段三列-Rt8和Rt9-Rt11。即这样的事情:

Question Type Student Bin1 Bin2  Bin3 
1  Q SNR 789331 4.25 4.00 4.666667 
2  Q2 SNR 789331 3.75 2.50 3.000000 
3  Q8 SNR 789331 4.00 2.50 3.333333 
4  Q10 SNR 789331 4.00 2.75 3.333333 
5  Q12 SNR 789331 3.50 3.25 3.666667 

任何帮助,将不胜感激!

我的数据被附加如下:

> dput(pulse) 
structure(list(Question = c("Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12", "Q", 
"Q2", "Q8", "Q10", "Q12", "Q", "Q2", "Q8", "Q10", "Q12"), Type = c("SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", "SNR", 
"SNR", "SNR", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", "FYS", 
"FYS", "FYS", "FYS", "FYS", "FYS", "FYS"), Student = c("789331", 
"789331", "789331", "789331", "789331", "805933", "805933", "805933", 
"805933", "805933", "826523", "826523", "826523", "826523", "826523", 
"832929", "832929", "832929", "832929", "832929", "838607", "838607", 
"838607", "838607", "838607", "841903", "841903", "841903", "841903", 
"841903", "843618", "843618", "843618", "843618", "843618", "852125", 
"852125", "852125", "852125", "852125", "876406", "876406", "876406", 
"876406", "876406", "879972", "879972", "879972", "879972", "879972", 
"885650", "885650", "885650", "885650", "885650", "888712", "888712", 
"888712", "888712", "888712", "903303", "903303", "903303", "903303", 
"903303", "796882", "796882", "796882", "796882", "796882", "827911", 
"827911", "827911", "827911", "827911", "830271", "830271", "830271", 
"830271", "830271", "831487", "831487", "831487", "831487", "831487", 
"834598", "834598", "834598", "834598", "834598", "836364", "836364", 
"836364", "836364", "836364", "839802", "839802", "839802", "839802", 
"839802", "855524", "855524", "855524", "855524", "855524", "873527", 
"873527", "873527", "873527", "873527", "885409", "885409", "885409", 
"885409", "885409", "894218", "894218", "894218", "894218", "894218", 
"928026", "928026", "928026", "928026", "928026", "932196", "932196", 
"932196", "932196", "932196", "955389", "955389", "955389", "955389", 
"955389", "956952", "956952", "956952", "956952", "956952", "957206", 
"957206", "957206", "957206", "957206", "957759", "957759", "957759", 
"957759", "957759", "959200", "959200", "959200", "959200", "959200", 
"962490", "962490", "962490", "962490", "962490", "968728", "968728", 
"968728", "968728", "968728", "969005", "969005", "969005", "969005", 
"969005", "971179", "971179", "971179", "971179", "971179", "976863", 
"976863", "976863", "976863", "976863", "981621", "981621", "981621", 
"981621", "981621", "952797", "952797", "952797", "952797", "952797", 
"965873", "965873", "965873", "965873", "965873", "967416", "967416", 
"967416", "967416", "967416", "975424", "975424", "975424", "975424", 
"975424"), Rt1 = c(4, 3, 4, 4, 3, 5, 4, 5, 5, 5, 4, 4, 4, 5, 
5, 4, 4, 4, 4, 3, 5, 5, 5, 5, 5, 2, 3, 4, 3, 4, 4, 5, 5, 4, 4, 
3, 3, 3, 4, 3, 3, 3, 4, 4, 4, 3, 4, 5, 4, 3, 4, 4, 4, 3, 5, 4, 
4, 4, 5, 5, 3, 4, 4, 4, 3, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, 4, 5, 3, 4, 4, 4, 3, 3, 5, 4, 4, 2, 2, 3, 4, NA, NA, 
NA, NA, NA, 3, 4, 4, 4, 3, NA, NA, NA, NA, NA, 5, 4, 5, 4, 4, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 4, 4, 3, 3, 4, 1, 3, 
4, 5, 4, 4, 4, 5, 4, 4, NA, NA, NA, NA, NA), Rt2 = c(4, 4, 4, 
4, 3, 4, 4, 4, 4, 4, 3, 4, 4, 5, 5, 4, 4, 4, 4, 3, 5, 5, 5, 5, 
5, 4, 4, 4, 4, 5, 4, 4, 5, 5, 4, NA, NA, NA, NA, NA, 4, 4, 4, 
4, 4, 3, 4, 4, 5, 3, 4, 4, 4, 5, 5, 4, 4, 4, 4, 4, 1, 5, 5, 5, 
3, 3, 5, 5, 5, 4, 5, 4, 3, 4, 5, 4, 5, 5, 5, 4, 4, 5, 4, 5, 4, 
5, 5, 5, 5, 5, 4, 4, 4, 4, 4, 3, 4, 3, 4, 3, 5, 5, 5, 5, 5, 3, 
5, 4, 4, 3, 4, 5, 5, 5, 5, 4, 4, 4, 5, 5, 4, 5, 5, 5, 4, 4, 2, 
2, 4, 4, 5, 5, 5, 5, 5, 3, 4, 4, 5, 5, 5, 5, 3, 5, 4, 5, 4, 4, 
5, 4, 5, 2, 3, 4, 3, 4, 3, 4, 4, 4, 4, 4, 3, 4, 4, 4, 4, 3, 4, 
3, 5, 5, 5, 5, 4, 5, 5, 5, 3, 4, 4, 5, 5, 5, 5, NA, NA, NA, NA, 
NA, NA, 4, 5, 5, 5, NA, NA, NA, NA, NA, 4, 4, 4, 4, 4), Rt3 = c(4, 
4, 4, 4, 4, 4, 4, 4, 4, 4, 3, 4, 4, 5, 5, 4, 4, 4, 4, 3, 5, 5, 
5, 5, 5, 4, 5, 4, 4, 4, 5, 4, 5, 5, 4, 4, 4, 4, 4, 3, 4, 3, 4, 
5, 5, 3, 4, 4, 4, 4, 3, 4, 4, 4, 5, NA, NA, NA, NA, NA, 3, 5, 
5, 5, 5, 3, 4, 5, 5, 3, 4, 3, 3, 4, 4, 4, 5, 5, 5, 5, 4, 5, 4, 
4, 4, 4, 4, 4, 4, 3, 4, 4, 4, 4, 4, 1, 3, 1, 4, 1, 4, 5, 5, 5, 
4, 4, 4, 4, 4, 3, 4, 5, 5, 5, 4, 4, 5, 5, 4, 4, 5, 5, 5, 4, 5, 
NA, NA, NA, NA, NA, 4, 4, 5, 5, 5, NA, NA, NA, NA, NA, 5, 4, 
4, 4, 3, 5, 4, 4, 5, 4, NA, NA, NA, NA, NA, 5, 4, 3, 5, 4, 3, 
4, 4, 4, 3, 5, 5, 4, 4, 5, 5, 4, 4, 5, 4, NA, 5, 5, 5, 5, 5, 
4, 4, 5, 5, NA, NA, NA, NA, NA, 5, 5, 5, 5, 5, 5, 5, 4, 3, 4, 
3, 4, 3, 3, 4), Rt4 = c(5, 4, 4, 4, 4, 4, 4, 3, 4, 3, 4, 4, 4, 
5, 5, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, NA, NA, NA, NA, NA, 5, 4, 
4, 4, 5, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, NA, NA, NA, NA, NA, 4, 
4, 4, 3, 5, 4, 4, 4, 4, 5, 3, 4, 4, 4, 5, 3, 4, 5, 5, 3, NA, 
NA, NA, NA, NA, 5, 5, 5, 5, 5, 5, 5, 4, 4, 5, 4, 4, 4, 4, 4, 
4, 4, 4, 4, 4, 1, 1, 2, 3, 2, 4, 5, 5, 5, 4, 4, 4, 4, 4, 5, 4, 
5, 5, 5, 5, 5, 5, 4, 4, 5, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
5, 4, 4, 5, 4, NA, NA, NA, NA, NA, 4, 4, 5, 4, 4, 4, 3, 3, 4, 
3, 5, 4, 4, 4, 5, NA, NA, NA, NA, NA, 5, 4, 3, 3, 4, NA, NA, 
NA, NA, NA, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA), Rt5 = c(3, 3, 3, 4, 4, 4, 3, 3, 3, 3, 4, 
5, 4, 5, 5, 2, 4, 4, 4, 4, 5, 5, 5, 5, 5, 4, 4, 4, 3, 3, 5, 4, 
4, 4, 5, 4, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 3, 4, 4, 4, 5, 
4, 4, 4, 4, 5, 4, 5, NA, NA, NA, NA, NA, 3, 2, 4, 4, 1, 3, 2, 
3, 5, 4, 5, 5, 5, 5, 5, 4, 5, 4, 5, 4, 4, 4, 4, 4, 5, 3, 4, 3, 
4, 4, 5, 4, 3, 4, 5, 4, 4, 5, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 4, 
4, 5, 5, 5, 5, 5, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 4, 
3, 3, 5, 5, NA, NA, NA, NA, NA, 4, 4, 4, 4, 4, 4, 4, 4, 4, 3, 
4, 2, 2, 4, 4, 5, 4, 4, 4, 4, 3, 3, 4, 4, 3, NA, NA, NA, NA, 
NA, 5, 5, 4, 4, 4, NA, NA, NA, NA, NA, 5, 5, 5, 5, 5, 5, 4, 4, 
4, 5, 4, 4, 4, 4, 4, 4, 4, 5, 4, 4, NA, NA, NA, NA, NA), Rt6 = c(4, 
2, 2, 1, 3, 4, 3, 3, 3, 3, 4, 5, 5, 4, 5, NA, NA, NA, NA, NA, 
5, 4, 4, 4, 5, NA, NA, NA, NA, NA, 5, 4, 4, 4, 5, 3, 3, 4, 4, 
4, 4, 3, 2, 1, 2, 4, 4, 4, 5, 4, 4, 5, 4, 3, 4, 4, 5, 5, 4, 4, 
3, 4, 4, 3, 3, 5, 3, 2, 3, 5, 4, 3, 3, 4, 3, 5, 4, 4, 4, 5, NA, 
NA, NA, NA, NA, 4, 4, 4, 4, 4, 3, 4, 3, 3, 3, 2, 2, 3, 2, 2, 
4, 4, 5, 4, 5, NA, NA, NA, NA, NA, 4, 5, 5, 4, 4, 5, 5, 5, 5, 
5, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
3, 2, 4, 3, 4, 5, 5, 4, 4, 4, 4, 4, 4, 4, 4, 3, 3, 3, 2, 4, 4, 
5, 4, 5, 5, 3, 3, 3, 3, 3, NA, NA, NA, NA, NA, NA, 5, 4, 4, 4, 
NA, NA, NA, NA, NA, 5, 3, 4, 4, 5, 4, 3, 4, 4, 3, 4, 4, 4, 3, 
4, 4, 4, 5, 4, 5, NA, NA, NA, NA, NA), Rt7 = c(5, 2, 2, 3, 3, 
4, 3, 3, 3, 3, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 5, 4, 
4, 4, 4, 4, 4, 3, 4, 5, 5, 4, 4, 4, 5, 3, 4, 3, 4, 4, 4, 3, 2, 
2, 3, 4, 4, 4, 4, 4, 5, 5, 4, 4, 4, 5, 4, 5, 4, 5, 3, 4, 4, 4, 
4, 4, 3, 1, 1, 5, NA, NA, NA, NA, NA, 5, 5, 4, 5, 5, 4, 5, 4, 
4, 4, 4, 4, 4, 4, 4, 3, 4, 3, 4, 4, 3, 3, 3, 3, 3, 5, 5, 5, 5, 
4, 4, 4, 4, 4, 5, 4, 5, 5, 3, 4, 5, 5, 5, 5, 5, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, 3, 5, 5, 4, 5, 5, 5, 3, 4, 5, 4, 4, 4, 
4, 4, 4, 3, 3, 3, 3, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
1, 1, 1, 1, 1, 5, 4, 4, 4, 5, 5, 4, 4, 4, 4, 4, 3, 3, 4, 4, 5, 
3, 4, 3, 4, 4, 4, 4, 4, 4, 3, 1, 1, 1, 1, 5, 5, 5, 4, 4, 3, 2, 
2, 3, 4), Rt8 = c(4, 3, 3, 3, 3, 4, 3, 3, 3, 3, 5, 5, 5, 4, 4, 
NA, NA, NA, NA, NA, 5, 4, 4, 5, 4, 3, 4, 3, 3, 4, 5, 4, 4, 3, 
5, 4, 4, 4, 4, 4, 4, 3, 4, 4, 4, 4, 4, 4, 4, 4, 5, 4, 4, 3, 5, 
4, 4, 4, 3, 4, 3, 4, 4, 3, 4, 1, 1, 1, 1, 3, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, 5, 5, 4, 4, 5, NA, NA, NA, NA, NA, 3, 
4, 3, 4, 4, 4, 4, 4, 4, 5, 4, 4, 4, 4, 4, 4, 5, 4, 4, 5, 5, 5, 
4, 3, 5, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, 3, 5, 5, 5, 5, 4, 4, 4, 5, 4, 5, 5, 4, 4, 3, 4, 3, 3, 
3, 3, 4, 4, 4, 4, 4, 4, 4, 2, 4, 4, 3, 3, 3, 3, 3, 5, 5, 4, 4, 
5, 5, 5, 4, 5, 5, 4, 3, 3, 4, 4, 5, 5, 5, 3, 3, 5, 4, 4, 4, 4, 
3, 2, 2, 2, 2, 5, 5, 5, 5, 5, NA, NA, NA, NA, NA), Rt9 = c(4, 
3, 3, 3, 3, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, 4, 3, 4, 4, 4, 4, 4, 4, 4, 5, 4, 3, 3, 4, 4, NA, NA, 
NA, NA, NA, 3, 3, 3, 2, 4, 4, 4, 4, 4, 4, 5, 4, 4, 3, 3, 5, 4, 
4, 4, 4, 3, 4, 4, 4, 4, 3, 1, 1, 1, 5, NA, NA, NA, NA, NA, 5, 
5, 5, 5, 5, 5, 5, 5, 4, 5, NA, NA, NA, NA, NA, 3, 4, 3, 3, 4, 
3, 3, 3, 2, 3, 5, 5, 5, 5, 5, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, 4, 5, 5, 4, 4, NA, NA, NA, NA, NA, 5, 4, 3, 4, 4, 4, 3, 3, 
3, 2, NA, NA, NA, NA, NA, 1, 1, 1, 1, 1, 2, 3, 4, 4, 2, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, 4, 1, 1, 1, 1, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA), Rt10 = c(5, 3, 3, 3, 4, NA, NA, NA, NA, 
NA, 5, 4, 4, 4, 4, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, 5, 4, 4, 3, 4, 4, 3, 3, 3, 4, 4, 3, 2, 3, 4, 
4, 4, 4, 4, 4, 5, 5, 4, 3, 3, 5, 4, 4, 3, 4, 3, 4, 4, 4, 3, 3, 
1, 1, 1, 4, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 5, 5, 4, 
3, 5, 4, 4, 4, 4, 4, 3, 4, 3, 3, 4, 1, 1, 2, 2, 3, 4, 5, 4, 4, 
4, 4, 4, 4, 3, 4, 4, 4, 4, 2, 5, 4, 4, 4, 3, 5, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 5, 4, 4, 4, 4, 4, 
4, 3, 4, 4, 4, 4, 5, 4, 4, 4, 4, 4, 4, 5, 4, 2, 2, 4, 4, 1, 1, 
3, 1, 2, 5, 5, 4, 4, 5, NA, NA, NA, NA, NA, 4, 5, 3, 4, 4, 5, 
5, 5, 5, 5, 4, 4, 4, 4, 4, 5, 3, 3, 2, 4, NA, NA, NA, NA, NA, 
3, 4, 3, 4, 4), Rt11 = c(5, 3, 4, 4, 4, 4, 3, 3, 3, 3, 4, 4, 
4, 4, 5, NA, NA, NA, NA, NA, 4, 4, 3, 3, 4, 3, 5, 5, 5, 5, 5, 
4, 4, 4, 5, 3, 5, 5, 5, 5, 4, 4, 4, 4, 5, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, 5, 5, 5, 4, 4, 4, 5, 5, 4, 5, 5, 3, 4, 5, 
4, NA, NA, NA, NA, NA, 5, 5, 5, 5, 5, 5, 5, 4, 4, 5, 4, 4, 4, 
4, 5, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 4, 4, 5, 4, 5, 4, 4, 
5, 4, 4, 4, 3, 3, 5, 5, 5, 5, 5, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 5, 4, 4, 
4, 5, 5, 4, 5, 5, 4, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
1, 1, 1, 2, 3, 5, 5, 4, 4, 5, 5, 5, 5, 5, 5, NA, NA, NA, NA, 
NA, 5, 5, 5, 5, 5, 4, 4, 4, 4, 4, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA)), .Names = c("Question", "Type", 
"Student", "Rt1", "Rt2", "Rt3", "Rt4", "Rt5", "Rt6", "Rt7", "Rt8", 
"Rt9", "Rt10", "Rt11"), row.names = c(NA, -205L), class = c("tbl_df", 
"tbl", "data.frame")) 
+0

请添加您使用的任何软件包的名称。 'transmute'不是一个基本的R函数。 – lmo

+0

请参阅“?mean”。你需要'na.rm = T' 对于你的例子中的colum Rt1:'mean(pulse $ Rt1,na.rm = T)' –

+0

@SRivero 谢谢!这有帮助,但我试图平均每个学生的各栏(即我想要Rt1,RT2和Rt3的平均值)。有没有办法做到这一点? – Bailey

回答

2

为了产生平均的行:

dataframe <- pulse[(number_of_rows_you_are_interested_in),] 
rowMeans(dataframe, na.rm = TRUE) 
+0

谢谢!但是有没有办法将它应用到平均值列Rt1-Rt4,Rt5-Rt8和Rt9-Rt11以创建三个新的平均值列? 我是一个完整的R初学者,所以额外的解释可能需要,肯定会感激! :) – Bailey

+0

@Bailey如果你想平均来自不同列的行并将结果保存在新列中,请使用'dplyr'包中的'mutate'。 'pulse%>%mutate(new_column1 = mean(c(Rt1:Rt4)),new_column2 = mean(c(Rt5:Rt8)),new_column3 = mean(c(Rt9:Rt11)))'使用列数而不是列名。 – Piotr

+1

你甚至不需要dplyr。请按照此链接https://stackoverflow.com/questions/9490485/how-can-i-get-the-average-mean-of-selected-columns – sweetmusicality

0
Rt1[!is.na(Rt1)] 

上面的代码通过排除器Rt1

所有NA条目返回减少数据帧

您可以在列中使用此表达式

0

我发现complete.cases()特别有用,只给你说有没有来港

pulse <- pulse[complete.cases(pulse), ] 

行,那么你就应该,而不必手动能够计算在这个数据帧

也,计算平均值,按照这个link的例子(这与您的问题非常相似)