我有一个df，其中包含一系列的列，这些列是物种计数（物种Xi），还有几列是不同水平的因子（FACi）。
enter image description here 我需要计算FAC1和FAC2交互作用水平上每个物种列Xi的中位数（通常是我的列位置1-26）。
我尝试使用功能group_by和lapply遍历各个级别，并沿数字列1-26的每个列重复该操作。
Median_df <-df％>％group_by（df $ FAC1，df $ FAC2）％>％lapply（df [，1：26]，median（））
该代码似乎无法正常工作，并且出现了一个奇怪的错误： “ grouped_df（groups $ data，groups $ group_names）中的错误： 延迟加载数据库'/Library/Frameworks/R.framework/Versions/3.4/Resources/library/assertthat/R/assertthat.rdb'已损坏 另外：警告消息： 1：在grouped_df（groups $ data，groups $ group_names）中： 重新开始中断的承诺评估 2：在grouped_df（groups $ data，groups $ group_names）中： R_decompress1中出现内部错误-3“
任何帮助将不胜感激。 已经谢谢你了，
