switch(E)
case e2:成分子句2;
...
case eN:成分子句N;
default:成分子句n+1;
}
c中的用法很活的,只有自己用了才会知道它的。。
你可以利用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))