Я хочу использовать tenorFunction в пакете RcppSimpleTensor (https://github.com/tlamadon/RcppSimpleTensor) для вычисления 3-мерной функции, подобной этой:
DGP <- function( x,y,z ) {
return((x + y - 5)^2 + (z-5)^2)
}
Я создаю 3 вектора значений для x, y и z:
xdata <- seq(0,10,length=10)
ydata <- seq(0,10,length=10)
zdata <- seq(0,5,length=15)
Я определяю функцию tenors:
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): ожидание одного значения"
Что я здесь не так делаю?