# NOT RUN {
# psa input provided with package
data("example_psa")
psa <- make_psa_obj(example_psa$cost, example_psa$effectiveness,
example_psa$parameters, example_psa$strategies)
# custom print and summary methods
print(psa)
summary(psa)
# custom plot method; see ?plot.psa for options
plot(psa)
# }
Run the code above in your browser using DataLab