## Not run:
# # example for Poisson outcome and Discrete covariates
# inputs <- generateSampleDataFile(clusSummaryPoissonDiscrete())
# runInfoObj<-profRegr(yModel=inputs$yModel,
# xModel=inputs$xModel, nSweeps=10, nClusInit=15,
# nBurn=20, data=inputs$inputData, output="output",
# covNames = inputs$covNames, outcomeT = inputs$outcomeT,
# fixedEffectsNames = inputs$fixedEffectNames)
#
# dissimObj<-calcDissimilarityMatrix(runInfoObj)
# clusObj<-calcOptimalClustering(dissimObj)
# riskProfileObj<-calcAvgRiskAndProfile(clusObj)
# clusterOrderObj<-plotRiskProfile(riskProfileObj,"summary.png")
# ## End(Not run)
Run the code above in your browser using DataLab