R/Beta.NA.R

Beta.NA <- function(y,X)
						{
						des=X[!is.na(y),]
						y1=y[!is.na(y)]
						B <- solve(t(des)%*%des)%*%t(des)%*%y1
						B
						}
ShixiangWang/arrayConnector documentation built on May 14, 2019, 6:02 a.m.