Различия

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

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
Следующая версия
Предыдущая версия
sensors:t:bt_opx_sengupta_1990 [2020/02/19 10:28]
f0ma
sensors:t:bt_opx_sengupta_1990 [2020/02/19 13:45] (текущий)
f0ma
Строка 7: Строка 7:
 </​WRAP>​ </​WRAP>​
  
-^ Article |  |+^ Article | <​ref:​sengupta1990> ​|
 ^ Collibration |  | ^ Collibration |  |
-^ Precision |  +^ Precision | ± 50°C 
-^ Ranges |  |+^ Ranges | 600 - 1300 °C, 6 - 60 kbar |
 ^ Renew sensors |  | ^ Renew sensors |  |
  
Строка 19: Строка 19:
   * <​del>​заголовок</​del>​   * <​del>​заголовок</​del>​
   * краткое описание   * краткое описание
-  * статья +  * <del>статья</​del>​ 
-  * ссылка +  * <del>ссылка</​del>​ 
-  * карточка+  * <del>карточка</​del>​
   * подробное описание   * подробное описание
   * <​del>​код</​del>​   * <​del>​код</​del>​
Строка 43: Строка 43:
     K <- KO / KB;     K <- KO / KB;
     T1 <- (4130 + 603 * (XM - XF) - 4423 * XT - 3595 * XA + 0.017 * P * 1000) / (1.9872 * log(K) + 3.27) - 273;     T1 <- (4130 + 603 * (XM - XF) - 4423 * XT - 3595 * XA + 0.017 * P * 1000) / (1.9872 * log(K) + 3.27) - 273;
-    T2 <- (4130 - 4423 * XT - 3595 * XA + 0.017 * P * 1000) / (1.9872 * log(K) + 3.27) - 273; +    T2 <- (4130                   ​- 4423 * XT - 3595 * XA + 0.017 * P * 1000) / (1.9872 * log(K) + 3.27) - 273; 
-    if (T2>899) { +    ​#if (T2>899) { 
-    T <- T2; +    ​#T <- T2; 
-    } +    ​#
-    if (T1<901) { +    ​#if (T1<901) { 
-    T <- T1; +    ​#T <- T1; 
-    } +    ​#
-    return(data.frame(Name=paste0(Bt$Name,"​-",​ Opx$Name),​P=P,​T_calc=T));+    return(data.frame(Name=paste0(Bt$Name,"​-",​ Opx$Name),​P=P,​T_calc=T1));
 } }
  
  • sensors/t/bt_opx_sengupta_1990.1582108129.txt.gz
  • Последние изменения: 2020/02/19 10:28
  • — f0ma