film      director variable value   box
1  007：大破天幕杀机   萨姆·门德斯    type2  惊悚 37596
2  007：大破天幕杀机   萨姆·门德斯    type1  动作 37596
3          101次求婚        陈正道    type1  爱情 19991
4          101次求婚        陈正道    type2       19991
5            2012 3D 罗兰·艾默里奇    type2  动作 13647
6            2012 3D 罗兰·艾默里奇    type1  灾难 13647
7           HOLD住爱          张琦    type1  喜剧  4660
8           HOLD住爱          张琦    type2  爱情  4660

改了变量的中文名字为英文，现在数据就是如上，想在这种情况下算出每个导演在每种类型下的最大票房、最小票房、票房总和以及影片数，因为有空值，用CAST的时候设置na.rm=TRUE，出来的不是想要的效果，

153  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  动作
154  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>
155  <NA>  <NA>  <NA>  <NA>  <NA>  爱情  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>
156  <NA>  <NA>  <NA>  <NA>  <NA>  魔幻  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>
157  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>
158  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>
159  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>  <NA>