if(interactive()){
plot_cop_surf(copula::frankCopula(2),
type="pdf",
plot_type="ggplot",
resolution = 5
)
plot_cop_surf(copula::frankCopula(2),
type="cdf",
plot_type="ggplot",
resolution = 5
)
#opens a new window
plot_cop_surf(cyl_quadsec(0.1),
type="pdf",
plot_type="rgl"
)
plot_cop_surf(cyl_quadsec(0.1),
type="pdf",
plot_type="rgl",
n_gridlines = 60
)
plot_cop_surf(cyl_quadsec(0.1),
type="pdf",
plot_type="plotly",
n_gridlines = 10,
resolution = 10
)
}
Run the code above in your browser using DataLab