我想使用 RcppSimpleTensor 包(https://github.com/tlamadon/RcppSimpleTensor)中的 tensorFunction 来计算像这样的 3 维函数:
DGP <- function( x,y,z ) {
return((x + y - 5)^2 + (z-5)^2)
}
我为 x、y 和 z 创建了 3 个值向量:
xdata <- seq(0,10,length=10)
ydata <- seq(0,10,length=10)
zdata <- seq(0,5,length=15)
我定义了张量函数:
library(RcppSimpleTensor)
RcppVals <- tensorFunction( R[i,j,k] ~ (X[i] + Y[j] - 5)^2 + (Z[k] - 5)^2 )
RcppArray <- RcppVals(xdata,ydata,zdata)
但是运行此函数会出现错误“tmpfun(X, Y, Z, k, j, i) 中的错误:期望单个值”
我在这里做错了什么?