example fixed
save old.par removed - dropped an error
better legend using plotrix::legendg
title case
new suggested package: plotrix