F1 <- new("L2ParamFamily")
plot(F1)
## selection of subpanels for plotting
F2 <- L2LocationScaleFamily()
layout(matrix(c(1,2,3,3), nrow=2, byrow=TRUE))
plot(F2,mfColRow = FALSE,
to.draw.arg=c("p","q","loc"))
plot(F2,mfColRow = FALSE, inner=list("empirical cdf","pseudo-inverse",
"L2-deriv, loc.part"), to.draw.arg=c("p","q","loc"))
Run the code above in your browser using DataLab