我需要帮助转换R 中的数据框：
-----------------------------------
| ID | x_1 | x_2 | ... | x_m |
|---------------------------------|
| id_1 | x_11 | x_12 | ... | x_1m |
|---------------------------------|
| ... |
|---------------------------------|
| id_n | x_n1 | x_n2 | ... | x_nm |
-----------------------------------
我有一个id列和从n次实验中获得的m次测量（x_1 - x_m）。对于每个实验/行，我想使用运行中位数来平滑m个测量值。
是否有一种简单的方法可以在R中进行这样的转换？
答案 0 :(得分：3)
library(zoo)
apply( dfrm[-1], 1, rollmedian, k=5)
OR：
cbind(dfrm[1], as.dataframe( apply( dfrm[-1], 1, rollmedian, k=5) ) )
答案 1 :(得分：2)
与@ DWin的答案类似，但使用 stats ?runmed：
apply(dfrm[-1], 1, runmed, k=5)