所以我有一堆保存数据列号的函数。例如，我的数据类似于：
>MergedData
[[1]]
Date EUR.HIGH EUR.LOW EUR.CLOSE EUR.OPEN EUR.LAST
01/01/16 1.00 1.00 1.25 1.30 1.24
[[2]]
Date AUD.HIGH AUD.LOW AUD.CLOSE AUD.OPEN AUD.LAST
01/01/16 1.00 1.00 1.25 1.30 1.24
我有29种以上货币。所以在这种情况下，MergedData [[1]]将返回我所有的欧元价格，依此类推29种货币。
我在R中也有一个函数来计算变量并保存与货币对应的数字1到29。此代码计算数据第一行中的值，即：
trending <- intersect(which(!ma.sig[1,]==0), which(!pricebreak[1,]==0))
返回类似的内容：
>sig.nt
[1] 1 2 5...
所以我可以用它来拉动趋势＆＃39;货币通过for（）函数：
for (i in length(sig.nt){
MergedData[[i]]
...misc. code for calculations of trending currencies...
}
我希望能够保存＆＃39;我的趋势货币供将来参考和计算。问题是每个新行的sig.nt变量都会发生变化。我在考虑使用lockBinding命令：
sig.exist <- sig.nt #saves existing trend
lockBinding('curexist', .GlobalEnv)
但每次运行我的脚本时，这仍然会被覆盖吗？非常感谢帮助！