# NOT RUN {
# Plot pdf and cdf of Normal
plot(Normal$new())
# Colour both plots red
plot(Normal$new(), col = "red")
# Change the colours of individual plotted functions
plot(Normal$new(), pdf_col = "red", cdf_col = "green")
# Interactive plotting in order - par still works here
plot(Geometric$new(),
fun = "all", ask = TRUE, pdf_col = "black",
cdf_col = "red", quantile_col = "blue", survival_col = "purple",
hazard_col = "brown", cumhazard_col = "yellow"
)
# Return plotting structure
x <- plot(Gamma$new(), plot = FALSE)
# }
Run the code above in your browser using DataLab