Различия
Здесь показаны различия между двумя версиями данной страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
classifydiag:basalts_pearce [2016/03/07 21:48] admin |
classifydiag:basalts_pearce [2018/11/12 15:07] (текущий) |
||
|---|---|---|---|
| Строка 1: | Строка 1: | ||
| - | ====== Zr-Ti-Y: Geodinamic Settings Pearce ====== | + | ====== Zr-Ti-Y: Geodinamic Settings, Pearce ====== |
| Basalts Geodinamic Settings, Pearce. | Basalts Geodinamic Settings, Pearce. | ||
| Строка 5: | Строка 5: | ||
| === Подробнее === | === Подробнее === | ||
| - | <data plot> | + | | Reference | | |
| - | Reference [wiki]: | + | | Data | bulk | |
| - | Data: bulk | + | | Input | Ti_ppm, Zr_ppm, Y_ppm | |
| - | Input: Ti_gpt, Zr_gpt, Y_gpt | + | |
| - | </data> | + | <use:classifydiag.basalts_pearce> |
| + | <test:classifydiag.basalts_pearce> | ||
| <WRAP center round todo 60%> | <WRAP center round todo 60%> | ||
| Строка 26: | Строка 27: | ||
| require('ggtern'); | require('ggtern'); | ||
| - | classifydiag.basalts_pearce <- function (wtp_data, annotate=T, labels=F, ...) | + | classifydiag.basalts_pearce <- function (wtp_data, ...) |
| { | { | ||
| - | ds <- selectNames(wtp_data,c('Name','Ti_gpt','Zr_gpt','Y_gpt')); | + | ds <- selectNames(wtp_data,c('Name','Ti_ppm','Zr_ppm','Y_ppm')); |
| pts <- data.frame(Name=ds$Name, | pts <- data.frame(Name=ds$Name, | ||
| - | X = ds$Zr_gpt, | + | X = ds$Zr_ppm, |
| - | Y = ds$Ti_gpt/100, | + | Y = ds$Ti_ppm/100, |
| - | Z = ds$Y_gpt*3); | + | Z = ds$Y_ppm*3); |
| - | labels <- c("Zr_gpt", "Ti_gpt/100", "Y_gpt*3"); | + | labels <- c("Zr", "Ti/100", "Y*3"); |
| ret <- c(); | ret <- c(); | ||
| Строка 45: | Строка 46: | ||
| } | } | ||
| </Code> | </Code> | ||
| + | |||
| + | {{tag>classifydiag wholerock}} | ||