Различия
Здесь показаны различия между двумя версиями данной страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
sensors:f:elect_sfa_shikazono [2015/10/27 12:50] admin |
— (текущий) | ||
|---|---|---|---|
| Строка 1: | Строка 1: | ||
| - | ====== Elect-Spha: Shikazono, 1985 ====== | ||
| - | Electrum – sphalerite fugacity sensor. | ||
| - | |||
| - | === Details === | ||
| - | |||
| - | <WRAP center round important 60%> | ||
| - | Не работает, нет тестов. | ||
| - | </WRAP> | ||
| - | |||
| - | ^ Article | Shikazono N. A comparison of temperatures estimated from the electrum – sphalerite – pyrite – argentite assemblage and filling temperatures of fluid implications from epithermal Au – Ag vein –type deposits in Japan Econ. Geol. 1985. V. 80. No 5. P. 1415 – 1424. | | ||
| - | ^ Reference | | | ||
| - | ^ Collibration | | | ||
| - | ^[[:ppy:mod_sensors#f_elect_sfa_shikazono|Calculate]] ^ ^ | ||
| - | |||
| - | |||
| - | === Source === | ||
| - | |||
| - | <Code linenums lang-r> | ||
| - | sensors.f.elect_sfa_shikazono <- function(Elect) | ||
| - | { | ||
| - | log_f_S = (1/4.576*Temp)*(-41980 + 16.52*Temp - 18.296*log(N_Ag)+(4*(1 - N_Ag)*2*(5650 - 1600*(1 - N_Ag) - 1.375*Temp))); | ||
| - | return(log_f_S); | ||
| - | } | ||
| - | |||
| - | sensors.f.elect_sfa_shikazono.args <- function() { | ||
| - | ars <- list(); | ||
| - | ars$minerals = c('Elect'); | ||
| - | ars$ranges = c(); | ||
| - | return(ars); | ||
| - | } | ||
| - | </Code> | ||