Различия
Здесь показаны различия между двумя версиями данной страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
recalc:grt_tpf_realc0 [2015/09/21 14:38] admin [Код] |
recalc:grt_tpf_realc0 [2018/11/12 15:08] (текущий) |
||
|---|---|---|---|
| Строка 1: | Строка 1: | ||
| - | ====== Grt: Пересчет для граната по TPF ====== | + | ====== Grt: TPF, 1991 ====== |
| Пересчет на 12 атомов кислорода. | Пересчет на 12 атомов кислорода. | ||
| - | ==== Подробнее ==== | + | ==== Details ==== |
| - | Кислородный метод программы [[:about_tpf|TPF]]. | + | ^ Reference | [[:about_tpf|TPF]] | |
| + | ^ Input | SiO2_wtp, Al2O3_wtp, TiO2_wtp, Cr2O3_wtp, Fe2O3_wtp, FeO_wtp, MnO_wtp, MgO_wtp, CaO_wtp, Na2O_wtp, K2O_wtp, BaO_wtp, NiO_wtp, ZnO_wtp, BeO_wtp, P2O5_wtp, V2O5_wtp, CoO_wtp, GeO2_wtp, ZrO2_wtp, Cs2O_wtp, PbO_wtp, SO3_wtp, CO2_wtp, F_wtp, Cl_wtp | | ||
| + | ^ Results | pfu, Fe_p3_pfu, Fe_p2_pfu, Al_c4_pfu, Al_c6_pfu | | ||
| - | ==== Код ==== | + | <use:recalc.grt_tpf_realc0> |
| - | <code> | + | <test:recalc.grt_tpf_realc0> |
| + | |||
| + | <WRAP center round todo 60%> | ||
| + | * заголовок | ||
| + | * краткое описание | ||
| + | * <del>статья</del> | ||
| + | * <del>ссылка</del> | ||
| + | * <del>карточка</del> | ||
| + | * подробное описание | ||
| + | * <del>код</del> | ||
| + | * тест | ||
| + | </WRAP> | ||
| + | |||
| + | === Source === | ||
| + | <Code linenums lang-r> | ||
| source('utilities_tpf.r') | source('utilities_tpf.r') | ||
| recalc.grt_tpf_realc0 <- function (wtp_data, ...) | recalc.grt_tpf_realc0 <- function (wtp_data, ...) | ||
| { | { | ||
| - | rn <- tpf.rename(wtp_data); | + | return(tpf.recalc_minaral("GRT",wtp_data)); |
| - | clk <- tpf.omesod(rn,12,999); | + | |
| - | rdat <- tpf.unrename(clk,wtp_data$Name); | + | |
| - | rdat$Fe_p3_pfu <- rdat$Fe_pfu - rdat$Fe_p2_pfu; | + | |
| - | return(rdat); | + | |
| } | } | ||
| - | </code> | + | </Code> |
| {{tag> order71}} | {{tag> order71}} | ||