https://github.com/cran/GAS
Tip revision: e588e3a10bf22cb7dff4a49a848baac63d743c3f authored by Leopoldo Catania on 04 February 2022, 09:30:12 UTC
version 0.3.4
version 0.3.4
Tip revision: e588e3a
Optimiser.cpp
#include <RcppArmadillo.h>
#include "DistWrap.h"
using namespace Rcpp;
using namespace arma;
//[[Rcpp::export]]
double StaticLLK_Univ(arma::vec vY, arma::vec vTheta, int iT, std::string Dist){
double dLLK = 0.0;
for(int i=0;i<iT;i++){
dLLK += ddist_univ(vY(i), vTheta, Dist, true);
}
return dLLK;
}
//[[Rcpp::export]]
double StaticLLK_Multi(arma::mat mY, arma::vec vTheta, int iT, int iN, std::string Dist){
double dLLK = 0.0;
for(int i=0;i<iT;i++){
dLLK += ddist_multi(mY.col(i), vTheta, iN, Dist, true);
}
return dLLK;
}