powered by
data(Feldspar) summary(Feldspar) ggtern(data=Feldspar,aes(x=An,y=Ab,z=Or)) + geom_point()
Run the code above in your browser using DataLab