就像我贴图的数据一样，这个数据框里有好多年不同股票月开盘价和收盘价（Mclsprc [月收盘价] -

Mopnprc [月开盘价] ），每个股票都对应着一个gtacode（国泰君安数据库下载的），一个月的收益率就如最右边那样（代码是：

FinanceDeal$month_1<-(FinanceDeal$Mclsprc_JY-FinanceDeal$Mopnprc_JY)/FinanceDeal$Mopnprc_JY

那么我该怎么在增加一列出来计算三个月的收益率？

这样循环函数代码该怎么写？