data(Phases); attach(Phases)
#PhasePlot(Phase.1.alpha, Phase.1.beta, level = 0.95, title = "Densities of Phase 1")
PhasePlot(Phase.2.alpha, Phase.2.beta, level = 0.95, title = "Densities of Phase 2",
colors = FALSE, exportFile = "CharacteristicsOfPhase", exportFormat = "SVG")
Run the code above in your browser using DataLab