Различия
Здесь показаны различия между двумя версиями данной страницы.
| Предыдущая версия справа и слева Предыдущая версия | |||
|
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)); |
| } | } | ||