## Not run: ------------------------------------
# data(wires)
#
# # Simultaneous 90% confidence regions for the mean and variance
# plot(csetMV(wires$Strength, method="mood"), main="Mood")
# plot(csetMV(wires$Strength, method="lrt"), main="LRT")
## ---------------------------------------------
Run the code above in your browser using DataLab