Feldsdpar
- One (1) row per Feldspar composition, FeldsdparRaster
- Raster Matrix
Data relating to Elkins and Groves Feldspar Data, the following datasets include
the experimental data and sample raster data from one of the images in the
referenced paper.
Feldspar
- Experimental Data
FeldsparRaster
- Raster Data for Fig. 6.
Elkins, L. T. & Grove, T. L. Ternary Feldspar Experiments and Thermodynamic Models American Mineralogist, Mineral Soc America, 1990, 75, 544-559
#Experimental Data data(Feldspar)#Raster data data(FeldsparRaster)
#Summarize the Feldspar Data data(Feldspar) summary(Feldspar)Experiment Feldspar Ab Or An T.C P.Gpa A1 : 2 Alkalai :20 Min. :0.0930 Min. :0.02300 Min. :0.00500 Min. :650.0 Min. :0.1000 A4 : 2 Plagioclase:20 1st Qu.:0.2550 1st Qu.:0.06575 1st Qu.:0.01675 1st Qu.:700.0 1st Qu.:0.1000 E2 : 2 Median :0.4140 Median :0.34850 Median :0.05000 Median :800.0 Median :0.2000 G10-2 : 2 Mean :0.4516 Mean :0.38510 Mean :0.16382 Mean :773.8 Mean :0.1825 G10-7 : 2 3rd Qu.:0.6615 3rd Qu.:0.71275 3rd Qu.:0.23775 3rd Qu.:820.0 3rd Qu.:0.2000 G10-9 : 2 Max. :0.7970 Max. :0.88000 Max. :0.85700 Max. :900.0 Max. :0.3000 (Other):28#Plot Felspar Data ggtern(data=Feldspar,aes(x=An,y=Ab,z=Or)) + geom_point()# Plot Feldspar data and Underlying Raster Image data(FeldsparRaster) ggtern(Feldspar,aes(Ab,An,Or)) + theme_rgbw() + annotation_raster_tern(FeldsparRaster,xmin=0,xmax=1,ymin=0,ymax=1) + geom_point(size=5,aes(shape=Feldspar,fill=Feldspar),color='black') + scale_shape_manual(values=c(21,24)) + labs(title = "Demonstration of Raster Annotation")