我尝试在 VBA 中调用我创建的 R 函数时遇到问题。问题不是来自 VBA 和 R 之间的连接,而是当我的 R 代码必须调用我自己的函数时,程序停止了。为了更清楚,这里是 R 代码:
args = commandArgs(trailingOnly=T)
sink('Y:/Documents/BC10.txt', append=F, type = "output",split=TRUE)
source("Y:/Documents/myfunction.R")
cat('TEST !!')
simul = args[1]
level = args[2]
spd1 = args[3]
spd2 = args[4]
spd3 = args[5]
date_valo = toString(args[6])
swap_rate = args[7]
l1 = 0
u1 = 0.03
rho2 = 0.5
cat('\nparameters are: ', simul, level, spd1 , spd2, spd3, date_valo, swap_rate)
PV_eq=PV_eq=myfunction(l1,u1,spd1,rho2,simul,level, date_valo, swap_rate)
cat(PV_eq)
sink()
当我运行我的 VBA 代码时,程序在显示文本文件“BC10.txt”中的参数方面做得很好,但它不显示 PV_eq。所以,我认为程序无法调用我的用户定义函数“myfunction”。
有人知道我遇到的问题吗?也许,我必须在我的 VBA 代码(或 R 代码)中添加一些东西,以便 VBA 考虑用户定义的函数?