Передача столбца в dataframe для работы с использованием Rccp

Question

Это просто очень базовые знания для многих людей, но я впервые использую пакет Rccp. Я хотел бы передать столбец в кадре данных в функцию, используя Rccp, который я могу манипулировать данными в столбце. Спасибо.

library(Rcpp)

df <- data.frame(Temp = c(25, 25, 85, 85, 125, 125, 125), Val =c(1.03, 1.06, 1.56,1.75,2, 1.85, 1.90), type=c(2,2,2,2,2,2,2))

arr<- df$Val

last <- length(arr)

cppFunction('int index(int arr[], int low, int high){

            int max = arr[low];

            int i;

            for (i = low; i <= high; i++)
            {
                if (arr[i] > max)
                max = arr[i];
            }
            return i;
}')

ind <- index(0,last-1,arr)

Answer 1

Пожалуйста, посмотрите, например,

• пример DataFrame в пакете RcppExamples
• и несколько других вопросов, где на SO-сайте
• Галерея Rcpp.

Самый простой пример из вышеупомянутого пакета - просто:

#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
List DataFrameExample(const DataFrame & DF) {

    // access each column by name
    IntegerVector a = DF["a"];
    CharacterVector b = DF["b"];
    DateVector c = DF["c"];

    // do something
    a[2] = 42;
    b[1] = "foo";
    c[0] = c[0] + 7; // move up a week

    // create a new data frame
    DataFrame NDF = DataFrame::create(Named("a")=a,
                                      Named("b")=b,
                                      Named("c")=c);

    // and return old and new in list
    return List::create(Named("origDataFrame") = DF,
                        Named("newDataFrame") = NDF);
}