Различия
Здесь показаны различия между двумя версиями данной страницы.
Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
classifydiag:cpx_morimoto_kitamura [2016/02/19 13:15] admin |
classifydiag:cpx_morimoto_kitamura [2018/11/12 15:07] (текущий) |
||
---|---|---|---|
Строка 1: | Строка 1: | ||
- | ====== Q-J diagram Morimoto and Kitamura, 1983 ====== | + | ====== Px: Q-J Diagram, Morimoto, 1988 ====== |
Classifiaction of pyroxene in Q-J system. | Classifiaction of pyroxene in Q-J system. | ||
Строка 5: | Строка 5: | ||
=== Details === | === Details === | ||
- | ^ Article | Morimoto, N., Kitamura, M., 1983. Q–J diagram for classification of pyroxens. Journal of the Japanese Association of Mineralogy, Petrology, and Economic Geology 78, 141. | | + | | Reference | <ref:morimoto1988> | |
- | ^[[:ppy:mod_classifydiag#cpx_morimoto_kitamura|Построить]] ^ ^ | + | | Data | mineral | |
+ | | Input | wtp | | ||
+ | |||
+ | <use:classifydiag.cpx_morimoto_kitamura> | ||
+ | <test:classifydiag.cpx_morimoto_kitamura> | ||
+ | |||
+ | <WRAP center round todo 60%> | ||
+ | * <del>заголовок</del> | ||
+ | * <del>краткое описание</del> | ||
+ | * <del>статья</del> | ||
+ | * <del>ссылка</del> | ||
+ | * <del>карточка</del> | ||
+ | * подробное описание | ||
+ | * <del>код</del> | ||
+ | * тест | ||
+ | </WRAP> | ||
=== Код метода === | === Код метода === | ||
<Code linenums lang-r> | <Code linenums lang-r> | ||
- | require("ggplot2"); | + | |
source("recalc_cpx_sturm.r"); | source("recalc_cpx_sturm.r"); | ||
Строка 28: | Строка 43: | ||
Y=c(1.5, 0.9, 0.2, 0.5, 1.0, 2.0)); | Y=c(1.5, 0.9, 0.2, 0.5, 1.0, 2.0)); | ||
- | lims <- c(0,2,0,2); | + | limits <- c(0,2,0,2); |
lines <- data.frame(X1 = c(0.0, 0.0, 2.0, 1.5), | lines <- data.frame(X1 = c(0.0, 0.0, 2.0, 1.5), | ||
Строка 39: | Строка 54: | ||
ret <- c(); | ret <- c(); | ||
- | ret$diatype <- "diagram"; | + | ret$type <- "diagram"; |
ret$points <- pts; | ret$points <- pts; | ||
- | ret$lims <- lims; | + | ret$limits <- limits; |
ret$marks <- marks; | ret$marks <- marks; | ||
ret$lines <- lines; | ret$lines <- lines; | ||
Строка 49: | Строка 64: | ||
} | } | ||
</Code> | </Code> | ||
+ | |||
+ | {{tag>classifydiag mineral}} |