Bt: Wu, Chen, 2015

Ti-in-biotite geothermometer for ilmenite- or rutile-bearing crustal metapelites.

Details

Reference	Chun-Ming Wu, Hong-Xu Chen Revised Ti-in-biotite geothermometer for ilmenite- or rutile-bearing crustal metapelites, 2014 [ref]
Collibration	300 natural rutile- or ililmenite-bearing metapelites collected worldwide.
Precision	± 65 °C
Ranges	P < 20 kbar, 500 °C < T < 800 °C
Renew sensors

Использовать Проверить

Для улучшения этой статьи следует:

Добавить подробное описание
Добавить тест

Source

source('recalc_bt_tindle.r');
 
sensors.t.bt_wu_chen <- function(Bt, P=3, usePFU = FALSE, ...){
 
if (!usePFU) Bt <- recalc.bt_tindle(Bt);

Ln_Tcalc = 6.313 + 0.224*(log(Bt$Ti_pfu)) - 0.288*log(log(Bt$Fe_pfu)) - 0.449*log(Bt$Mg_pfu)+ 0.15*(P/10);

Tcalc = exp(Ln_Tcalc);
 
return (data.frame(Name=Bt$Name, P_seq=P, T_calc_Bt_Putirka=Tcalc));
}
 
sensors.t.bt_wu_chen.args <- function() {
    ars <- list();
    ars$minerals = c('Bt');
    ars$ranges = c('P');
    return(ars);
}