aboutsummaryrefslogtreecommitdiff
path: root/src/bslmm.cpp
diff options
context:
space:
mode:
authorPeter Carbonetto2017-06-19 13:49:30 -0500
committerPeter Carbonetto2017-06-19 13:49:30 -0500
commitf3df6447b345c6b4dee79d9996696978520344bb (patch)
treebf687502f55c7a2d4afcde584d5e58432c3cbfb9 /src/bslmm.cpp
parente5d51f314214d780ef5fbe91b50d25fad8472d54 (diff)
downloadpangemma-f3df6447b345c6b4dee79d9996696978520344bb.tar.gz
Removed FORCE_FLOAT from param.cpp.
Diffstat (limited to 'src/bslmm.cpp')
-rw-r--r--src/bslmm.cpp30
1 files changed, 20 insertions, 10 deletions
diff --git a/src/bslmm.cpp b/src/bslmm.cpp
index 92762e2..563b743 100644
--- a/src/bslmm.cpp
+++ b/src/bslmm.cpp
@@ -1730,10 +1730,14 @@ void BSLMM::MCMC (const gsl_matrix *X, const gsl_vector *y) {
gsl_vector_view Xtznew_sub=gsl_vector_subvector(Xtz_new, 0, rank_new.size());
gsl_vector_view betanew_sub=gsl_vector_subvector(beta_new, 0, rank_new.size());
- gsl_matrix_memcpy(&Xold_sub.matrix, &Xnew_sub.matrix);
- gsl_matrix_memcpy(&XtXold_sub.matrix, &XtXnew_sub.matrix);
- gsl_vector_memcpy(&Xtzold_sub.vector, &Xtznew_sub.vector);
- gsl_vector_memcpy(&betaold_sub.vector, &betanew_sub.vector);
+ gsl_matrix_memcpy(&Xold_sub.matrix,
+ &Xnew_sub.matrix);
+ gsl_matrix_memcpy(&XtXold_sub.matrix,
+ &XtXnew_sub.matrix);
+ gsl_vector_memcpy(&Xtzold_sub.vector,
+ &Xtznew_sub.vector);
+ gsl_vector_memcpy(&betaold_sub.vector,
+ &betanew_sub.vector);
}
} else {
cHyp_new=cHyp_old;
@@ -1777,12 +1781,18 @@ void BSLMM::MCMC (const gsl_matrix *X, const gsl_vector *y) {
}
}
- gsl_matrix_set(Result_hyp,w_col,0,cHyp_old.h);
- gsl_matrix_set(Result_hyp,w_col,1,cHyp_old.pve);
- gsl_matrix_set(Result_hyp,w_col,2,cHyp_old.rho);
- gsl_matrix_set(Result_hyp,w_col,3,cHyp_old.pge);
- gsl_matrix_set(Result_hyp,w_col,4,cHyp_old.logp);
- gsl_matrix_set(Result_hyp,w_col,5,cHyp_old.n_gamma);
+ gsl_matrix_set(Result_hyp,w_col,0,
+ cHyp_old.h);
+ gsl_matrix_set(Result_hyp,w_col,1,
+ cHyp_old.pve);
+ gsl_matrix_set(Result_hyp,w_col,2,
+ cHyp_old.rho);
+ gsl_matrix_set(Result_hyp,w_col,3,
+ cHyp_old.pge);
+ gsl_matrix_set(Result_hyp,w_col,4,
+ cHyp_old.logp);
+ gsl_matrix_set(Result_hyp,w_col,5,
+ cHyp_old.n_gamma);
for (size_t i=0; i<cHyp_old.n_gamma; ++i) {
pos=mapRank2pos[rank_old[i]]+1;