PPoints: Igneous Petrology Points
In geophys: Geophysics, Continuum Mechanics, Gravity Modeling

Description Usage Format Details Source References Examples

Scanned points from igneous petrology

1	data(PPoints)

The format is: List of 4 $ x : num [1:16] 45.4 56.4 64.1 71.1 66.3 ... $ y : num [1:16] 9.39 13.56 11.36 8.36 5.84 ... $ lab : chr [1:16] "minor varieties" "phonolites" "trachytes" "rhyolites" ... $ rots: num [1:16] 45 0 0 0 0 0 0 -90 0 0 ...

Can click on here with a mixture to get a location on the plot.

scanned figure

Principles of Igneous and Metamorphic Petrology, A. R. Philpotts, 1990, Prentice Hall <ISBN-13:978-0521880060>.

data(Glines)
data(PPoints)

plot(Glines[[1]], type='n', xlab="SiO2", ylab="NA2O+K2O")
for(i in 1:length(Glines))
{

lines(Glines[[i]]$x, Glines[[i]]$y)

}

for(i in 1:length(PPoints$x))
{
text(PPoints$x[i],PPoints$y[i], label=PPoints$lab[i], srt=PPoints$rots[i])
}