From 6ad902584846a77a17f028279dbf0a2fdfcb14e3 Mon Sep 17 00:00:00 2001 From: "Tae Yoon (Harry) Lee" Date: Fri, 16 Jun 2023 09:15:13 -0700 Subject: [PATCH] Update voipred.R Change output names of calc_NB_moments --- R/voipred.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/voipred.R b/R/voipred.R index 0d903ba..924bfef 100644 --- a/R/voipred.R +++ b/R/voipred.R @@ -210,7 +210,7 @@ calc_NB_moments <- function(Y,pi,z,weights=NULL){ # mean of NB_model, mean of NB_all, # var of NB_model, var of NB_all, # correlation of NB_model and NB_all - return(c(mu1=mu[1],mu2=mu[2],sd1=sqrt(sig11),sd2=sqrt(sig22),rho=cor_coefficient)) + return(c(mu1=mu[1],mu2=mu[2],sigma1=sqrt(sig11),sigma2=sqrt(sig22),rho=cor_coefficient)) }