plot(huberPsi)
plot(huberPsi, which=c("psi", "Dpsi", "wgt"),
shortMain=TRUE, leg = "topleft")
plot(hampelPsi)
## Plotting aspect ratio = 1:1 :
plot(hampelPsi, asp=1, shortMain=TRUE,
which = c("psi", "Dpsi", "wgt", "Dwgt"))Run the code above in your browser using DataLab