在整个 R 脚本段中使用 for 循环/应用函数独立迭代
Iterate independently with a for loop/ apply function through a whole segment of R script
我想用 for
循环或 lapply
函数的想法遍历我的整个 R 脚本段,看看如果我更改一个值,我的解决方案会有何不同 y
.
如果我使用 for
循环
numbers <- c(1,2,3,4)
for (y in numbers){
...(lots of code with assignments to global environment, etc.)
}
或 lapply
numbers <-(c(1,2,3,4)
lapply(numbers,function(y){...})
两者似乎都不是独立的,即我希望它从我放入此函数的那一点重新开始,而不是在全局环境中定义的第一个数字 1 的变量会干扰解决方案从迭代数字 2 开始。
所以本质上,我想要 R 脚本中的自动化版本,而不是手动更改 y 的值并查看我得到的解决方案。我想感兴趣的变量必须用 return()
或类似的方法返回,这样它才不会在迭代中丢失?
我觉得你的问题没说清楚。你能提供一个输出示例吗?
numbers <-(c(1,2,3,4))
# Multiply each number by 2 and see what the output is
lapply(numbers,function(y){y*2})
这将取每个 "input" 数字“1、2、3 和 4”,并将每个元素乘以数字 2。输出应为“2、4、6 和 9” “ 分别。
我想用 for
循环或 lapply
函数的想法遍历我的整个 R 脚本段,看看如果我更改一个值,我的解决方案会有何不同 y
.
如果我使用 for
循环
numbers <- c(1,2,3,4)
for (y in numbers){
...(lots of code with assignments to global environment, etc.)
}
或 lapply
numbers <-(c(1,2,3,4)
lapply(numbers,function(y){...})
两者似乎都不是独立的,即我希望它从我放入此函数的那一点重新开始,而不是在全局环境中定义的第一个数字 1 的变量会干扰解决方案从迭代数字 2 开始。
所以本质上,我想要 R 脚本中的自动化版本,而不是手动更改 y 的值并查看我得到的解决方案。我想感兴趣的变量必须用 return()
或类似的方法返回,这样它才不会在迭代中丢失?
我觉得你的问题没说清楚。你能提供一个输出示例吗?
numbers <-(c(1,2,3,4))
# Multiply each number by 2 and see what the output is
lapply(numbers,function(y){y*2})
这将取每个 "input" 数字“1、2、3 和 4”,并将每个元素乘以数字 2。输出应为“2、4、6 和 9” “ 分别。