有没有一种方法可以“宏”输入多个值以优化R？

Question

我有以下代码：

ffmpeg

我的问题是，如果我有多个R0值（例如1、1.2、1.7、4.3 ...），有没有办法我可以一次将所有这些值传递到优化过程中并将其全部吐出，还是只需要手动更改每个值的R0？

谢谢！

Answer 1

使用sapply

x <- seq(1.1, 1.7, by = .1)
sapply(x, optimize, f = objective.function, interval = c(0,1))

或使用purrr

library(purrr)
map(x, ~optimize(f = objective.function, interval = c(0,1), R0 = .x))

或

map_dfr(x, ~optimize(f = objective.function, interval = c(0,1), R0 = .x))