合并列表中的数据帧
这个问题在这里已经有了答案:
  您可以尝试merge Reduce 
 Reduce(function(...) merge(..., by='custID', all=TRUE), res)
 #     custID top_pct.x top_pct.y
 #1      1        10        10
 #2      2        20        20
 #3      6        NA        10
 #4      7        NA        20
  或者像@Colonel Beauvel建议的那样,更可读的方法是将Curry的library(functional) 
 library(functional)
 Reduce(Curry(merge, by='custID', all=T), res)
