?dcast有段话:
     If the combination of variables you supply does not uniquely
     identify one row in the original data set, you will need to supply
     an aggregating function, 'fun.aggregate'. 
This function should
     take a vector of numbers and return a single summary statistic.
如果要一次返回3个值的话好像得用ddply: