问题1
wuju2[,16]<-(wuju2[,1]-wuju2[,6])/wuju2[,7]
wuju2[,17]<-(wuju2[,2]-wuju2[,8])/wuju2[,9]
wuju2[,18]<-(wuju2[,3]-wuju2[,10])/wuju2[,11]
wuju2[,19]<-(wuju2[,4]-wuju2[,12])/wuju2[,13]
wuju2[,20]<-(wuju2[,5]-wuju2[,14])/wuju2[,15]
   请问这一块代码怎么写成循环呢，我一遇到这种有间隔得数字，或则需要多次计数得就完全步知道怎么循环了
希望有会的朋友可以教以下，我学习以下提高下工作效率

问题2
我有一个数据框，我想让他上海16年相加，上海14年相加，怎么做到呢，用dply分组，我试了用group_by(上海，产业，年份)然后summrise（n=sum(value)）似乎不行，不知道是不是就是这样，如果写成循环这种3列，3列得要怎么循环呢。

location	industry	year	value
上海	第一产业	2016	1143400
上海	第二产业	2016	84062800
上海	第三产业	2016	1.97E+08
上海	第一产业	2014	1242600
上海	第二产业	2014	81677100
上海	第三产业	2014	1.53E+08