확인 행렬의 목록의 요소가있는 경우 rcpp

Question

에 나는 행렬의 목록을 가지고 노나 그들 중 일부는 다음과 같이, NA 있습니다

listToCheck <- list(NA, matrix(0,nrow = 2, ncol = 2)) 

내가 확인 Rcpp에서 코드를 작성하고 싶습니다 리스트의 요소가 NA인지 아닌지를 나타냅니다.

나는

// [[Rcpp::depends(RcppArmadillo)]] 
#include <RcppArmadillo.h> 
using namespace Rcpp; 

// [[Rcpp::export]] 
bool checkNa(int i, List elemInCluster){ 

    arma::mat matrix = elemInCluster[i]; 

    if(R_IsNA(matrix(0,0))){ 
    return true; 
    } 

    return false; 
} 

다음 두 가지를 시도하지만 매트릭스는 NA 경우에도 첫 번째 요소에 액세스하려고으로 내가 checkNa(0, listToCheck)을 시도 할 때 Error in checkNa(0, listToCheck) : Not a matrix.을 제공대로 작동하지 않습니다.

R_IsNA는 double에서 작동하므로, 해당 요소 중 하나에 액세스하지 않고 행렬이 NA인지 확인하는 방법이 있습니까? this example가 작동하는 것 같다에서 같은 시도 - 캐치 사용

Answer 1

:

#include <Rcpp.h> 
using namespace Rcpp; 

// [[Rcpp::export]] 
bool checkNa(int i, List elemInCluster){ 

    try { 
    return R_IsNA(elemInCluster[i]); 
    } catch(...) { 
    return false; 
    } 
} 


> checkNa(0, listToCheck) 
[1] TRUE 

> checkNa(1, listToCheck) 
[1] FALSE