Различия

Здесь показаны различия между двумя версиями данной страницы.

--- sensors:p:grt_cpx_mercier_1980_b [2018/11/12 15:08]
127.0.0.1 внешнее изменение
+++ sensors:p:grt_cpx_mercier_1980_b [2020/02/19 13:23] (текущий)
f0ma
@@ Строка 31: / Строка 31: @@
 source("utilities_tpf.r");
-sensors.p.grt_cpx_mercier_1980_b <- function(Grt, Cpx, ...){
+sensors.p.grt_cpx_mercier_1980_b <- function(Cpx, ...){
+    Name = Cpx$Name;
     Cpx <- tpf.recalc_minaral("CPX",Cpx);
@@ Строка 50: / Строка 51: @@
     P <- (176.43 * log(XKW) - 706.14 * log(XKA) - 224.56) / D;
     }
-    return(data.frame(Name=paste0(Cpx$Name),P_calc=P));
+    return(data.frame(Name=Name,P_calc=P));
 }
 sensors.p.grt_cpx_mercier_1980_b.args <- function(){
     ars <- list();
-    ars$minerals <- c("Grt", "Cpx");
+    ars$minerals <- c("Cpx");
     ars$ranges <- c();
     return(ars);