Eu tenho um grande problema de desempenho em R. Eu escrevi uma função que itera sobre um data.frameobjeto. Ele simplesmente adiciona uma nova coluna a data.framee acumula algo. (operação simples). O data.frametem aproximadamente 850K linhas. Meu PC ainda está funcionando (cerca de 10 horas agora) e...
Fechadas. Esta pergunta não atende às diretrizes do Stack Overflow . Atualmente não está aceitando respostas. Quer melhorar esta questão? Atualize a pergunta para que esteja no tópico do Stack Overflow. Fechado há 3 anos . Melhore esta questão...
Atualmente, estou trabalhando em um método bayesiano que requer várias etapas de otimização de um modelo de logit multinomial por iteração. Estou usando o optim () para realizar essas otimizações e uma função objetiva escrita em R. Uma criação de perfil revelou que o optim () é o principal...
Normalmente, trabalho com uma função Rcpp curta que recebe como entrada uma matriz em que cada linha contém K probabilidades que somam 1. A função então amostra aleatoriamente para cada linha um número inteiro entre 1 e K correspondente às probabilidades fornecidas. Esta é a função: //...
Considere 1) uma classe personalizada com uma impressão de memória potencialmente grande e 2) uma função de nível superior que realiza algum pré-processamento, depois cria e retorna um novo objeto de nossa classe personalizada. Para evitar cópias desnecessárias por valor, a função aloca o objeto e...
Em uma função, desejo calcular valores numéricos, atribuir nomes a eles e retornar um ordenado NumericVectorem Rcpp. Posso classificar os vetores (usando isso ), mas a ordem dos nomes dos valores permanece a mesma. library(Rcpp) x <- c(a = 1, b = 5, c = 3) cppFunction(' NumericVector...
Como posso passar um valor de NA de Rcpp para R em um vetor de 64 bits? Minha primeira abordagem seria: // [[Rcpp::export]] Rcpp::NumericVector foo() { Rcpp::NumericVector res(2); int64_t val = 1234567890123456789; std::memcpy(&(res[0]), &(val), sizeof(double)); res[1] = NA_REAL;...