Я использую функцию julia_eval
из пакета JuliaCall
, чтобы ускорить решение стохастических дифференциальных уравнений (с пакетом diffeqr
) в R
.
Псевдокод:
# Drift fuction
f <- julia_eval("
function f(du,u,p,t)
[differential equations]
end")
# Diffusion function
g <- julia_eval("
function g(du,u,p,t)
[noise]
end")
sde.solve('f', 'g', init_conditions, timespan, parameters)
Я хотел бы передать дополнительный аргумент (add_arg
) в функцию смещения, чтобы я мог ее изменить.
Моя попытка:
# Drift function
f <- julia_eval("
function f(du,u,p,t, add_arg = value)
[differential equations]
end")
sde.solve('f(add_arg=value)', 'g', init_conditions, timespan, parameters)
Однако, похоже, это не способ сделать это. Отсюда вопрос: как передать дополнительный в функцию julia_eval
?