diff --git a/R/GAPIT.EMMAxP3D.R b/R/GAPIT.EMMAxP3D.R index bf47e34..0f590cd 100644 --- a/R/GAPIT.EMMAxP3D.R +++ b/R/GAPIT.EMMAxP3D.R @@ -828,7 +828,7 @@ beta.N=as.numeric(beta)[c(1:(1+CV.Extragenetic))] BLUE.N=XCVN%*%beta.N BLUE.I=rep(0,length(BLUE.N)) - if(if(ncol(XCV)>1))BLUE.I=XCVI%*%beta.I + if(ncol(XCV)>1)BLUE.I=XCVI%*%beta.I #Interception only # if(length(beta)==1)XCV=X BLUE=cbind(BLUE.N,BLUE.I)