fit.drug <- lme(yprime ~ -1 + X.drug ,
random = list (Id=pdIdent(~Z.drug-1)),control=lmeControl(opt="optim"))
fitted(fit.drug) only gives the fitted value for population and subject level.
now how to get fitted value and their SE or CI for Y-hat (any specific value, say median of Y) from mixed model as above?