Error message

  • Deprecated function: The each() function is deprecated. This message will be suppressed on further calls in book_prev() (line 775 of /home3/gardeoi3/public_html/iamrandom/modules/book/book.module).
  • Deprecated function: implode(): Passing glue string after array is deprecated. Swap the parameters in drupal_get_feeds() (line 394 of /home3/gardeoi3/public_html/iamrandom/includes/common.inc).

Generic wrapper

###### Libraries
library(Rcpp)
library(inline)

###### wrapper
fx <- cxxfunction(,"",includes=
  '
**********FILL FUNCTIONS IN HERE************
RCPP_MODULE(foo)
   {   function( "functionname1", &functionname1 ) ;
       function( "functionname2", &functionname2 ) ;
   }
', plugin="Rcpp")
foo <- Module("foo",getDynLib(fx))