Chciałbym wiedzieć, czy istnieje sposób na stworzenieRcpp funkcje za pomocąinline pakiety w głównej funkcji. To jest przykład tego, co chcę zrobić:

library(inline)
library(Rcpp)
a = 1:10
cpp.fun = cxxfunction(signature(data1="numeric"), 
                      plugin="Rcpp",
                      body="
int fun1( int a1)
{int b1 = a1;
 b1 = b1*b1;
 return(b1);
}

NumericVector fun_data  = data1;
int n = data1.size();
for(i=0;i<n;i++){
fun_data[i] = fun1(fun_data[i]);
}
return(fun_data);
                           ")

co powinno skutkować:

> cpp.fun(a)
[1]  1  4  9  16  25  36  49  64  81  100

wiem jednak, że kompilator nie zaakceptuje utworzenia własnej funkcji w głównej metodzie. Jak pójdę do tworzenia i nazywania innegoRcpp funkcja zinline bez konieczności przekazywania go do R?