R/linhat.R

linhat <-
function(x,con,est=tmean,...){
#
# estimate all linear contrasts specified by con
#
psihat=0
xbar=llocv2(x,est=est,...)$center
for(i in 1:ncol(con))psihat[i]=sum(con[,i]*xbar)
psihat
}
musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.