# NOT RUN {
# Use the result of the nca command :
data(nca.example)
data <- nca.example
model <- nca_analysis(data, c(1, 2), 3)
# This shows the summaries in the console
nca_output(model)
# Suppress the summaries and display the plots
nca_output(model, plots=TRUE, summaries=FALSE)
# Suppress the summaries and display the bottlenecks
nca_output(model, bottlenecks=TRUE, summaries=FALSE)
# Show all three
nca_output(model, plots=TRUE, bottlenecks=TRUE)
# Export to PDF, the plots and summaries each to a file per independent variable
# All the bottlenecks will exported to a single file
nca_output(model, plots=TRUE, bottlenecks=TRUE, pdf=TRUE)
# Use the path option to export to an existing directory
outdir <- "/tmp"
# }
# NOT RUN {
nca_output(model, plots=TRUE, pdf=TRUE, path=outdir)
# }
Run the code above in your browser using DataLab