tmp <- plyr::ddply(data,c('路线代码','方向','车道编号','起点桩号','止点桩号','技术等级','路面类型','道路结构和材料'),reframe,x=deterioration_analysis_table(PCI,ESAL,数据年份))
上述代码中，deterioration_analysis_table返回的是多行多列的一个dataframe，但x不能接收，除非转为dlply。有没有办法可以使ddply返回多列，从而不需要额外的转换。（多行已经可以通过reframe实现）