Различия
Здесь показаны различия между двумя версиями данной страницы.
Предыдущая версия справа и слева Предыдущая версия | |||
sensors:t:bt_opx_sengupta_1990 [2020/02/19 12:23] f0ma |
sensors:t:bt_opx_sengupta_1990 [2020/02/19 13:45] (текущий) f0ma |
||
---|---|---|---|
Строка 32: | Строка 32: | ||
sensors.t.bt_opx_sengupta_1990 <- function(Bt, Opx, P, ...){ | sensors.t.bt_opx_sengupta_1990 <- function(Bt, Opx, P, ...){ | ||
- | Name <- paste0(Bt$Name,"-", Opx$Name); | ||
Opx <- tpf.recalc_minaral("OPX",Opx); | Opx <- tpf.recalc_minaral("OPX",Opx); | ||
Bt <- tpf.recalc_minaral("BT",Bt); | Bt <- tpf.recalc_minaral("BT",Bt); | ||
Строка 51: | Строка 50: | ||
#T <- T1; | #T <- T1; | ||
#} | #} | ||
- | return(data.frame(Name=Name,P=P,T_calc=T1)); | + | return(data.frame(Name=paste0(Bt$Name,"-", Opx$Name),P=P,T_calc=T1)); |
} | } | ||