Не удается передать RInside в качестве ссылки

Итак, я пытаюсь использовать RInside для приложения, но не могу разобраться в этом вопросе. Я прочитал этот вопрос и думаю, что делаю то же самое: Передача экземпляра 'R' RInside в качестве параметра между классами/методами

Но почему-то не работает, вот пример кода:

pair<Rcpp::NumericVector,int> kmedoids (RInside & R, vector<int> alerts) {

    R["M"] = alerts;

    string txt = "library(cluster);"
                 "result <- clara(M, 2);";

    R.parseEvalQ(txt);

    Rcpp::NumericVector result((SEXP) R.parseEval("res <- result$cluster"));
    Rcpp::NumericMatrix clusinfo1 ((SEXP) R.parseEval("clusinfo <- result$clusinfo"));

    int biggerCluster = getBiggerCluster(clusinfo1);

    pair <Rcpp::NumericVector,int> par;
    par.first = result;
    par.second = biggerCluster;

    return par;
}


RInside R(int argc, char *argv[]);
pair<Rcpp::NumericVector,int> srcIPKmedoid = kmedoids(R, srcIPAmounts);
pair<Rcpp::NumericVector,int> dstIPKmedoid = kmedoids(R, dstIPAmounts);
pair<Rcpp::NumericVector,int> attackClassKmedoid = kmedoids(R, attackClassAmounts);

Ошибка, которую я получаю:

/home/renato/workspace/tilera/oads/AM/src/AM.cpp:442:73: error: invalid initialization    of non-const reference of type ‘RInside&’ from an rvalue of type ‘RInside (*)(int, char**)’
/home/renato/workspace/tilera/oads/AM/src/AM.cpp:302:31: error: in passing argument 1 of ‘std::pair<Rcpp::Vector<14>, int> kmedoids(RInside&, std::vector<int>)’
/home/renato/workspace/tilera/oads/AM/src/AM.cpp:443:73: error: invalid initialization of non-const reference of type ‘RInside&’ from an rvalue of type ‘RInside (*)(int, char**)’
/home/renato/workspace/tilera/oads/AM/src/AM.cpp:302:31: error: in passing argument 1 of ‘std::pair<Rcpp::Vector<14>, int> kmedoids(RInside&, std::vector<int>)’
/home/renato/workspace/tilera/oads/AM/src/AM.cpp:444:85: error: invalid initialization of non-const reference of type ‘RInside&’ from an rvalue of type ‘RInside (*)(int, char**)’
/home/renato/workspace/tilera/oads/AM/src/AM.cpp:302:31: error: in passing argument 1 of ‘std::pair<Rcpp::Vector<14>, int> kmedoids(RInside&, std::vector<int>)’

Я делаю именно то, что делает пример Дирка с Qt, передавая RInside в качестве ссылки, что я делаю неправильно?

Заранее спасибо.


person Renato Oliveira    schedule 25.06.2013    source источник


Ответы (1)


RInside R(int argc, char *argv[]); не является объектом — это объявление функции. Вместо этого попробуйте RInside R(argc, argv);.

person Casey    schedule 25.06.2013