- time<-c(2010,2011,2012,2013,2014,2015)
- A<-c(7.476765,7.358353,7.478502,7.293819,7.183748,7.146269)
- B<-c(7.560331,7.436100,7.443750,7.513846,7.501084,7.203817)
- C<-c(6.941667,6.417576,6.393596,6.323970,6.467541,6.488060)
- D<-c(8.087778,7.995726,7.917699,7.847619,7.915504,7.556962)
- E<-c(7.020968,7.084884,6.697436,6.880916,6.610000,6.472195)
- combine<-cbind(A,B,C,D,E)
- combine<-as.data.frame(combine)
- row.names(combine)<-time
然后算出每一行的平均值,并画出每年的平均值关于年份的折线图
- rowmean<-rowMeans(combine)
- plot(time,rowmean,type = "l")
可以很明显的看出,每年的平均值都在下降。
我的问题是,如何分析每个不同的水平A、B、C、D、E对于这种下降的趋势的贡献,
或者采用什么分析方法才能分析出哪个水平对这种下降的趋势贡献最大。


雷达卡






京公网安备 11010802022788号







