Различия
Здесь показаны различия между двумя версиями данной страницы.
Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
sensors:t:grt_cpx_krogh_ravna [2016/05/13 14:13] admin |
sensors:t:grt_cpx_krogh_ravna [2020/02/19 14:31] (текущий) f0ma |
||
---|---|---|---|
Строка 1: | Строка 1: | ||
- | ====== Grt-Cpx Ravna, 2000 ====== | + | ====== Grt-Cpx: Ravna, 2000 ====== |
Калиброван на 360 образцах с широким покрытием давлений температур и составов из 27 экспериментальных наборов данных и 49 природных высоко-Mn гранулитах из Ruby Range, Montana, USA, и Karnataka, India с коэффициентом корреляции: (r2=0.98). | Калиброван на 360 образцах с широким покрытием давлений температур и составов из 27 экспериментальных наборов данных и 49 природных высоко-Mn гранулитах из Ruby Range, Montana, USA, и Karnataka, India с коэффициентом корреляции: (r2=0.98). | ||
Строка 30: | Строка 30: | ||
sensors.t.grt_cpx_krogh_ravna <- function(Grt, Cpx, P, usePFU = FALSE, ...){ | sensors.t.grt_cpx_krogh_ravna <- function(Grt, Cpx, P, usePFU = FALSE, ...){ | ||
+ | |||
+ | Name <- paste0(Grt$Name,"-",Cpx$Name); | ||
if (!usePFU) Grt <- recalc.grt_12ox_norm(Grt); | if (!usePFU) Grt <- recalc.grt_12ox_norm(Grt); | ||
Строка 46: | Строка 48: | ||
169.4 * (P/10) ) / (log(Kd)+1.223) - 273 ; | 169.4 * (P/10) ) / (log(Kd)+1.223) - 273 ; | ||
- | return (data.frame(Name=paste0(Grt$Name,'-',Cpx$Name),P = P, T_calc_grt_cpx_krogh_ravna=Tcalc)); | + | return (data.frame(Name=Name,P = P, T_calc_grt_cpx_krogh_ravna=Tcalc)); |
} | } | ||