https://github.com/cran/GAS
Raw File
Tip revision: e588e3a10bf22cb7dff4a49a848baac63d743c3f authored by Leopoldo Catania on 04 February 2022, 09:30:12 UTC
version 0.3.4
Tip revision: e588e3a
PIT.cpp
#include <RcppArmadillo.h>
#include "DistWrap.h"

using namespace Rcpp;
using namespace arma;

//[[Rcpp::export]]
arma::vec EvaluatePit_Univ(arma::mat mTheta, arma::vec vY, std::string Dist, int iT){

  arma::vec vU(iT);
  int t;

  for(t=0;t<iT;t++){
    vU(t) = pdist_univ(vY(t), mTheta.col(t), Dist);
  }

  return vU;

}

back to top