funn/R/funn.r

In abx56/mrmr: What the Package Does in One 'Title Case' Line

funn<-function(a){
fun.src <- '
Environment stats("package:mrmr");
Function estpab = stats["estpab"];
Rcpp::NumericVector xa(a);

return xa;
'
fun.test <- cxxfunction(signature(a = "numeric"),fun.src, plugin = "Rcpp")
fun.test(a)

}