# Coefficient of variation
xx <- seq(-3, 3, length=101)
plot(xx, xx^2, col='slateblue', type='l', bty='n', lwd=3, xlab=expression(mu), ylab=expression(sigma^2), las=1)