# NOT RUN {
data(res)
data(covset)
v <- res$ori.res$v
v$E <- v$E[1:2,]
v$weights <- v$weights[1:2,]
Subject <- covset$ear
Time <- covset$time
ncores <- 1
NewTimeOut <- rmRNAseq:::NewTimeEst(v, Subject, Time, ncores)
NewTimeOut
# }
Run the code above in your browser using DataLab