calcAvgRiskAndProfile: Calculation of the average risks and profiles In PReMiuM: Dirichlet Process Bayesian Clustering, Profile Regression

Description

Calculation of the average risks and profiles.

Usage

 ```1 2``` ```calcAvgRiskAndProfile(clusObj, includeFixedEffects=F, proportionalHazards=F) ```

Arguments

 `clusObj` Object of type clusObj. `includeFixedEffects` By default this is set to FALSE. If it is set to FALSE then the risk profile is computed with the parameters beta of the fixed effects assumed equal to zero. If it is set to TRUE, then risk profile at each sweep is computed adjusting for the sample of the beta parameter at that sweep. `proportionalHazards` Whether the risk matrix should include lambda only for the yModel="Survival" case so that the proportional hazards can be computed in the plotting function. The default is the average survival time.

Value

A list with the following components. This is an object of type riskProfileObj.

 `riskProfClusObj` The object of type clusObj as given in the input of this function. `risk` A matrix that has a column for each cluster and a row for each sweep. Each element of the matrix represents the estimated risk at each sweep for each cluster. `profile` An array whose first dimension is the number of sweeps, the second is the number of clusters, the third is the number of discrete covariates and the fourth is the number of categories of each of the covariates. Each element of the array represents the covariate profile at each sweep for each cluster. The fourth dimension does not exists if the covariate type is Normal. If the covariate type is mixed, then instead of this element, the two elements below are defined, 'profilePhi' and 'profileMu'. `profileStar` This is NULL if there has not been any variable selection. otherwise it contains the `empiricals` A vector of length of the optimal number of clusters, where each value is the empirical mean of the outcome for each cluster. `profileStdDev` An array whose first dimension is the number of sweeps, the second is the number of clusters, the third and the fourth are the number of continuous covariates. Each square matrix identified by the first and second dimension of the array represents the standard deviation at each sweep for each cluster. This element is only available if the covariate type is continuous or mixed. `profilePhi` This array is the equivalent of the 'profile' above for discrete covariates in case of mixed covariates. `profileStarPhi` This array is defined as profile and profilePhi, but the values are computed only if a variable selection procedure has been run. The definition of the star profile is given in Liverani, S., Hastie, D. I. and Richardson, S. (2013) PReMiuM: An R package for Bayesian profile regression. `profileMu` This array is the equivalent of the 'profile' above for Normal covariates in case of mixed covariates. `profileStarMu` This array is defined as profile and profileMu, but the values are computed only if a variable selection procedure has been run. The definition of the star profile is given in Liverani, S., Hastie, D. I. and Richardson, S. (2013) PReMiuM: An R package for Bayesian profile regression. `nuArray` For yModel=Survival when weibullFixedShape=FALSE this array contains the sampled values of the shape parameter nu. The first dimension is the number of sweeps, the second is the number of clusters.

Authors

David Hastie, Department of Epidemiology and Biostatistics, Imperial College London, UK

Silvia Liverani, Department of Epidemiology and Biostatistics, Imperial College London and MRC Biostatistics Unit, Cambridge, UK

Maintainer: Silvia Liverani <[email protected]>

References

Silvia Liverani, David I. Hastie, Lamiae Azizi, Michail Papathomas, Sylvia Richardson (2015). PReMiuM: An R Package for Profile Regression Mixture Models Using Dirichlet Processes. Journal of Statistical Software, 64(7), 1-30. URL http://www.jstatsoft.org/v64/i07/.

Examples

 ``` 1 2 3 4 5 6 7 8 9 10 11 12``` ```## Not run: generateDataList <- clusSummaryBernoulliDiscrete() inputs <- generateSampleDataFile(generateDataList) runInfoObj<-profRegr(yModel=inputs\$yModel, xModel=inputs\$xModel, nSweeps=10, nBurn=20, data=inputs\$inputData, output="output", nClusInit=15, covNames=inputs\$covNames) dissimObj<-calcDissimilarityMatrix(runInfoObj) clusObj<-calcOptimalClustering(dissimObj) riskProfileObj<-calcAvgRiskAndProfile(clusObj) ## End(Not run) ```

PReMiuM documentation built on Sept. 26, 2018, 5:04 p.m.