## See vpc.ronkeizer.com for more documentation and examples
library(vpc)
vpc_db <- vpc(sim = simple_data$sim, obs = simple_data$obs, vpcdb = TRUE)
plot_vpc(vpc_db, title = "My new vpc", x = "Custom x label")
Run the code above in your browser using DataLab