Различия
Здесь показаны различия между двумя версиями данной страницы.
Следующая версия | Предыдущая версия | ||
classifydiag:basalts_cr_y_pearce [2016/03/04 14:10] admin создано |
classifydiag:basalts_cr_y_pearce [2018/11/12 15:07] (текущий) |
||
---|---|---|---|
Строка 1: | Строка 1: | ||
- | ====== Y-Cr: Petrotectonic Environments, Pearce ====== | + | ====== Y-Cr: Petrotectonic Environments, Pearce, 1982 ====== |
+ | Discrimination diagram for characterizing island-arc tholeiiters on the basis of Y-Cr covariations. | ||
+ | === Details === | ||
+ | |||
+ | | Reference | <ref:pearce1982> | | ||
+ | | Data | bulk | | ||
+ | | Input | Cr_ppm, Y_ppm | | ||
+ | |||
+ | <use:classifydiag.basalts_cr_y_pearce> | ||
+ | <test:classifydiag.basalts_cr_y_pearce> | ||
+ | |||
+ | <WRAP center round todo 60%> | ||
+ | * <del>заголовок</del> | ||
+ | * <del>краткое описание</del> | ||
+ | * <del>статья</del> | ||
+ | * <del>ссылка</del> | ||
+ | * карточка | ||
+ | * подробное описание | ||
+ | * код | ||
+ | * тест | ||
+ | </WRAP> | ||
+ | |||
+ | === Source === | ||
+ | |||
+ | <Code> | ||
+ | |||
+ | require('ggplot2'); | ||
+ | |||
+ | classifydiag.basalts_cr_y_pearce <- function (wtp_data, ...) | ||
+ | { | ||
+ | ds <- selectNames(wtp_data,c('Name','Cr_ppm','Y_ppm')) | ||
+ | |||
+ | pts <- data.frame(Name=ds$Name, | ||
+ | X = ds$Y_ppm, | ||
+ | Y = ds$Cr_ppm); | ||
+ | |||
+ | labels <- c("Y", "Cr"); | ||
+ | |||
+ | ret <- c(); | ||
+ | ret$type <- "diagram"; | ||
+ | ret$points <- pts; | ||
+ | ret$labels <- labels; | ||
+ | ret$limits <- c(1,250,10,2000); | ||
+ | ret$scale <- c('log','log'); | ||
+ | |||
+ | return(ret); | ||
+ | } | ||
+ | |||
+ | </Code> | ||
+ | |||
+ | {{tag>classifydiag wholerock}} |