On 05/12/2011 1:22 PM, Paul Viefers wrote:
Dear all,

running the example by D. Eddebuettel 
(http://dirk.eddelbuettel.com/blog/2011/04/23/) I get an error message. 
Specifically, the R code I was taking from the above example is

### BEGIN EXAMPLE ###

suppressMessages(require(RcppArmadillo))
suppressMessages(require(Rcpp))
suppressMessages(require(inline))
code<- '
    arma::mat coeff = Rcpp::as<arma::mat>(a);
    arma::mat errors = Rcpp::as<arma::mat>(e);
    int m = errors.n_rows; int n = errors.n_cols;
    arma::mat simdata(m,n);
    simdata.row(0) = arma::zeros<arma::mat>(1,n);
    for (int row=1; row<m; row++) {
      simdata.row(row) = simdata.row(row-1)*trans(coeff)+errors.row(row);
    }
    return Rcpp::wrap(simdata);
  '
## create the compiled function
rcppSim<- cxxfunction(signature(a="numeric",e="numeric"),
                         code,plugin="RcppArmadillo")

### END OF EXAMPLE ###

Executing this inside R, returned the following:

ERROR(s) during compilation: source code errors or compiler configuration 
errors!

Program source:
   1:
   2: // includes from the plugin
   3: #include<RcppArmadillo.h>
   4: #include<Rcpp.h>
   5:
   6:
   7: #ifndef BEGIN_RCPP
   8: #define BEGIN_RCPP
   9: #endif
  10:
  11: #ifndef END_RCPP
  12: #define END_RCPP
  13: #endif
  14:
  15: using namespace Rcpp;
  16:
  17:
  18: // user includes
  19:
  20:
  21: // declarations
  22: extern "C" {
  23: SEXP file33765791( SEXP a, SEXP e) ;
  24: }
  25:
  26: // definition
  27:
  28: SEXP file33765791( SEXP a, SEXP e ){
  29: BEGIN_RCPP
  30:
  31:    arma::mat coeff = Rcpp::as<arma::mat>(a);
  32:    arma::mat errors = Rcpp::as<arma::mat>(e);
  33:    int m = errors.n_rows; int n = errors.n_cols;
  34:    arma::mat simdata(m,n);
  35:    simdata.row(0) = arma::zeros<arma::mat>(1,n);
  36:    for (int row=1; row<m; row++) {
  37:      simdata.row(row) = simdata.row(row-1)*trans(coeff)+errors.row(row);
  38:    }
  39:    return Rcpp::wrap(simdata);
  40:
  41: END_RCPP
  42: }
  43:
  44:
Error in compileCode(f, code, language = language, verbose = verbose) :
   Compilation ERROR, function(s)/method(s) not created!
Executing command 'C:/PROGRA~1/R/R-214~1.0/bin/i386/R CMD SHLIB file33765791.cpp 
2>  file33765791.cpp.err.txt' returned status 1

I am working under R 2.14.0 and as the pros among you might guess, I am new to 
using the C++ interfaces within R. I think all I have to do is to edit some 
settings on my Windows 7 machine here, but the error message is too cryptic to 
me. Alas, I could also not find any thread or help topic that deals with this 
online. I appreciate any direct reply or reference where I can find a solution 
to this.
Please let me know in case I am leaving out some essential details here.

If you put the program source into a file (e.g. fn.cpp) and in a Windows cmd shell you run

R CMD SHLIB fn.cpp

what do you get? I would guess you've got a problem with your setup of the compiler or other tools, and this would likely show it.

Duncan Murdoch

______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

Reply via email to