data_SkyeLava | R Documentation |
AFM compositions of 23 aphyric Skye lavas.
1 row per point, 23 points in total, Each point contains data on the following:
No: ID, S1 to S23
A: Percent Na2O+K2O ,
F: Percent Fe2O3
F: Percent MgO
J. Aitchison
Aitchison, J. The statistical analysis of compositional data Chapman and Hall London, 1986, pp360
# Emulate & Enhance plot produced in Fig. 3, pg 7 of:
# Martin-Fernandez, J.; Chacon-Duran, J. & Mateu-Figueras, G.
# Updating on the kernel density estimation for compositional data
# Proceedings of 17th Conference IASC-ERSS, Compstat, Roma,(Italy), 2006, 713-720
data(SkyeLava)
breaks = c(.01,.05,.10,.25,.5,.75,.9,.95,.99)
ggtern(SkyeLava,aes(F,A,M)) +
theme_bw() +
theme_showarrows() +
theme_latex() +
theme(tern.panel.grid.minor = element_blank(),
tern.panel.grid.major = element_line(linetype='dotted',color='darkgray'),
tern.axis.text = element_text(size=8)) +
geom_density_tern() +
geom_point() +
limit_tern(breaks = breaks,
labels = sprintf("%.2f",breaks)) +
labs(title = "Aphyric Skye Lavas",
subtitle = "AFM Compositions of 23 samples",
Tarrow = "A = Na_2O + K_2O",
Larrow = "F = Fe_20_3",
Rarrow = "M = MgO")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.