2017-06-21 68 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的例子(這與您的問題非常相似)