Различия
Здесь показаны различия между двумя версиями данной страницы.
Следующая версия | Предыдущая версия Следующая версия Следующая версия справа и слева | ||
spdgrams:ree_continental_curst_upper [2016/03/11 12:05] admin создано |
spdgrams:ree_continental_curst_upper [2016/03/24 08:55] admin |
||
---|---|---|---|
Строка 1: | Строка 1: | ||
- | ====== REE: Continental Curst: Upper, Rudnik and Gao, 2004 ====== | + | ====== Continental Curst: Upper, Rudnik and Gao, 2003 ====== |
Строка 5: | Строка 5: | ||
<data plot> | <data plot> | ||
- | Reference [wiki]: | + | Reference [wiki]: <ref:rudnick2003> |
Data: bulk | Data: bulk | ||
Input: ppm | Input: ppm | ||
</data> | </data> | ||
+ | <use:spdgrams.ree_continental_curst_upper> | ||
+ | <test:spdgrams.ree_continental_curst_upper> | ||
<WRAP center round todo 60%> | <WRAP center round todo 60%> | ||
- | * заголовок | + | * <del>заголовок</del> |
* краткое описание | * краткое описание | ||
- | * статья | + | * <del>статья</del> |
- | * ссылка | + | * <del>ссылка</del> |
* <del>карточка</del> | * <del>карточка</del> | ||
* подробное описание | * подробное описание | ||
- | * код | + | * <del>код</del> |
* тест | * тест | ||
</WRAP> | </WRAP> | ||
Строка 25: | Строка 27: | ||
<Code linenums lang-r> | <Code linenums lang-r> | ||
- | require('ggplot'); | + | require('ggplot2'); |
cmp <- read.csv("constants_continental_curst_compositions.csv", sep=";", stringsAsFactors=F); | cmp <- read.csv("constants_continental_curst_compositions.csv", sep=";", stringsAsFactors=F); | ||
- | spdgrams.ree_continental_curst_upper <- function(ppm_data) | + | spdgrams.ree_continental_curst_upper <- function(ppm_data, el_order = NULL) |
+ | { | ||
+ | ns <- el_order; | ||
+ | |||
+ | if (is.null(el_order)) | ||
{ | { | ||
ns <- c('Cs', 'Rb', 'Ba', 'Th', 'U', 'Nb', 'Ta', 'La', 'Ce', 'Pb', 'Pr', | ns <- c('Cs', 'Rb', 'Ba', 'Th', 'U', 'Nb', 'Ta', 'La', 'Ce', 'Pb', 'Pr', | ||
'Sr', 'Nd', 'Zr', 'Hf', 'Sm', 'Eu', 'Gd', 'Tb', 'Dy', 'Y', 'Ho', | 'Sr', 'Nd', 'Zr', 'Hf', 'Sm', 'Eu', 'Gd', 'Tb', 'Dy', 'Y', 'Ho', | ||
'Er', 'Tm', 'Yb', 'Lu'); | 'Er', 'Tm', 'Yb', 'Lu'); | ||
+ | } | ||
pmsc <- c(); | pmsc <- c(); | ||
Строка 56: | Строка 63: | ||
} | } | ||
</Code> | </Code> | ||
+ | |||
+ | {{tag>spdgrams continental}} |