Различия
Здесь показаны различия между двумя версиями данной страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
recalc:grt_12ox_norm [2015/09/24 14:06] admin |
recalc:grt_12ox_norm [2020/02/19 14:29] (текущий) f0ma |
||
|---|---|---|---|
| Строка 1: | Строка 1: | ||
| - | ====== Grt: Пересчет для граната на кислород с нормированием на катионы ====== | + | ====== Grt: Ravna, 2000 ====== |
| Расчет на 23 атомов кислорода: SiO2 TiO2 Al2O3 FeO MnO MgO CaO. Расчет валентного железа - по кристалохимии. | Расчет на 23 атомов кислорода: SiO2 TiO2 Al2O3 FeO MnO MgO CaO. Расчет валентного железа - по кристалохимии. | ||
| - | === Подробнее === | + | === Details === |
| - | ^ Информация о публикации | По статье Ravna, 2001. | | + | ^ Reference | <ref:ravna2000> | |
| - | ^ Ссылка | | | + | ^ Input | SiO2_wtp, Al2O3_wtp, TiO2_wtp, FeO_wtp, MnO_wtp, MgO_wtp, CaO_wtp | |
| - | ^ Учитываемые компоненты | SiO2_wtp, Al2O3_wtp, TiO2_wtp, FeO_wtp, MnO_wtp, MgO_wtp, CaO_wtp | | + | ^ Results | Fe_p3_pfu, Fe_p2_pfu | |
| - | ^ Выводимые компоненты | Fe_p3_pfu, Fe_p2_pfu | | + | <use:recalc.grt_12ox_norm> |
| - | ^ [[:ppy:mod_recalc#grt_12ox_norm|Рассчитать]] | | | + | <test:recalc.grt_12ox_norm> |
| + | |||
| + | <WRAP center round todo 60%> | ||
| + | * заголовок | ||
| + | * краткое описание | ||
| + | * <del>статья</del> | ||
| + | * <del>ссылка</del> | ||
| + | * <del>карточка</del> | ||
| + | * подробное описание | ||
| + | * <del>код</del> | ||
| + | * тест | ||
| + | </WRAP> | ||
| + | |||
| + | === Source === | ||
| <Code linenums lang-r> | <Code linenums lang-r> | ||
| Строка 16: | Строка 29: | ||
| recalc.grt_12ox_norm <- function (wtp_data, ...) | recalc.grt_12ox_norm <- function (wtp_data, ...) | ||
| { | { | ||
| + | ox_group <-c('Name', 'SiO2_wtp','TiO2_wtp', 'Al2O3_wtp', 'FeO_wtp', 'MnO_wtp', 'MgO_wtp', 'CaO_wtp'); | ||
| - | ox_group <-c('SiO2_wtp','TiO2_wtp', 'Al2O3_wtp', 'FeO_wtp', 'MnO_wtp', 'MgO_wtp', 'CaO_wtp'); | + | wtp_group <- selectNames(wtp_data,ox_group); |
| - | + | ||
| - | wtp_group <- wtp_data[,c('Name','SiO2_wtp','TiO2_wtp', 'Al2O3_wtp', 'FeO_wtp', 'MnO_wtp', 'MgO_wtp', 'CaO_wtp')]; | + | |
| ox_normed <- recalc.common_oxygen (wtp_group, 12); | ox_normed <- recalc.common_oxygen (wtp_group, 12); | ||
| Строка 35: | Строка 47: | ||
| return (cbind(ret,normed_cations[,c('Ti_pfu', 'Al_pfu', 'Fe_pfu', 'Mn_pfu', 'Mg_pfu', 'Ca_pfu','Fe_p2_pfu','Fe_p3_pfu')])); | return (cbind(ret,normed_cations[,c('Ti_pfu', 'Al_pfu', 'Fe_pfu', 'Mn_pfu', 'Mg_pfu', 'Ca_pfu','Fe_p2_pfu','Fe_p3_pfu')])); | ||
| + | |||
| } | } | ||
| </Code> | </Code> | ||