DeBUG taxa index and GTindex

jiabowang · Apr 27, 2024 · 4e8702e · 4e8702e
1 parent 6fd7265
commit 4e8702e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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)