Extract fitted values from a hisemit object
# S3 method for hisemit
fitted(object, fitted.type = c("lfdr", "fpp", "pi0", "f"), 
        gene.list, component, ...)
A hisemit object
One of c("lfdr", "fpp", "pi0", "f"). See details.
Not implemented
Specifying which additive component is extracted. See details.
Not used.
A numeric vector
For the fitted.type argument,
'lfdr' specifys local false discovery rates to be extracted.
'fpp' specifys false positive proportion to be extracted.
'pi0' specifys prior probability of null hypothesis to be extracted.
'f' specifys the smooth function to be extracted.
When fitted.type='f', the component specifies which component of the fitted smooth function to be extracted. 
        If component is missing, the overal function is returned. 
        If component='intercept', only the intercept term is returned. 
        If component is numeric, then it specifies the smooth function corresponding to which covariate to be extracted.
Long Qu, Dan Nettleton, Jack Dekkers (2012) A hierarchical semiparametric model for incorporating inter-gene relationship information for analysis of genomic data. Biometrics, 68(4):1168-1177
plot.hisemit, fitted.hisemit, coef.hisemit, vcov.hisemit, residuals.hisemit, logLik.hisemit, confint.hisemit, print.hisemit,
penLik.EMNewton