Различия
Здесь показаны различия между двумя версиями данной страницы.
Предыдущая версия справа и слева Предыдущая версия | |||
classifydiag:cpx_ca_mg_fe [2019/09/11 13:06] f0ma |
classifydiag:cpx_ca_mg_fe [2019/09/11 13:15] (текущий) f0ma |
||
---|---|---|---|
Строка 31: | Строка 31: | ||
{ | { | ||
ds <- selectNames(recalc.cpx_4cat_norm(wtp_data), | ds <- selectNames(recalc.cpx_4cat_norm(wtp_data), | ||
- | c('Name','Ca_pfu','Mg_pfu','Fe_pfu','Fe_p2_pfu','Fe_p3_pfu','Na_pfu')); | + | c('Name','Ca_pfu','Mg_pfu','Mn_pfu','Fe_pfu','Fe_p2_pfu','Fe_p3_pfu','Na_pfu')); |
marks <- data.frame(Label=c('Diopside','Hedenbergite','Augite','Pigeonite','Clinoenstotite','Clinoferrosilite'), | marks <- data.frame(Label=c('Diopside','Hedenbergite','Augite','Pigeonite','Clinoenstotite','Clinoferrosilite'), | ||
Строка 48: | Строка 48: | ||
X = ds$Mg_pfu, | X = ds$Mg_pfu, | ||
Y = ds$Ca_pfu, | Y = ds$Ca_pfu, | ||
- | Z = ds$Fe_pfu); | + | Z = ds$Fe_pfu + ds$Mn_pfu); |
labels <- c("En", "Wo", "Fs"); | labels <- c("En", "Wo", "Fs"); |