Различия

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

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

Предыдущая версия справа и слева Предыдущая версия
Следующая версия
Предыдущая версия
classifydiag:basalts_cr_y_pearce [2016/03/07 23:09]
admin
classifydiag:basalts_cr_y_pearce [2018/11/12 15:07] (текущий)
Строка 1: Строка 1:
-====== Y-Cr: Petrotectonic Environments,​ Pearce ​ ======+====== Y-Cr: Petrotectonic Environments,​ Pearce, 1982  ​======
  
 Discrimination diagram for characterizing island-arc tholeiiters on the basis of Y-Cr covariations. ​ Discrimination diagram for characterizing island-arc tholeiiters on the basis of Y-Cr covariations. ​
Строка 5: Строка 5:
 === Details === === Details ===
  
-<​ref:​pearce1982>​+| Reference | <​ref:​pearce1982> | 
 +| Data | bulk | 
 +| Input | Cr_ppm, Y_ppm | 
 + 
 +<​use:​classifydiag.basalts_cr_y_pearce>​ 
 +<​test:​classifydiag.basalts_cr_y_pearce>
  
 <WRAP center round todo 60%> <WRAP center round todo 60%>
Строка 22: Строка 27:
 <​Code>​ <​Code>​
  
-require('​ggplot');+require('​ggplot2');
    
 classifydiag.basalts_cr_y_pearce <- function (wtp_data, ...) classifydiag.basalts_cr_y_pearce <- function (wtp_data, ...)
 {  ​ {  ​
-ds <- selectNames(wtp_data,​c('​Name','​Cr_gpt','​Y_gpt'))+ds <- selectNames(wtp_data,​c('​Name','​Cr_ppm','​Y_ppm'))
    
 pts <- data.frame(Name=ds$Name,​ pts <- data.frame(Name=ds$Name,​
-                  X = ds$Y_gpt+                  X = ds$Y_ppm
-                  Y = ds$Cr_gpt);+                  Y = ds$Cr_ppm);
    
-labels <- c("​Y ​gpt", "​Cr ​gpt");+labels <- c("​Y",​ "​Cr"​);​
    
 ret <- c(); ret <- c();
Строка 45: Строка 50:
  
 </​Code>​ </​Code>​
 +
 +{{tag>​classifydiag wholerock}}
  • classifydiag/basalts_cr_y_pearce.1457392193.txt.gz
  • Последние изменения: 2018/11/12 15:08
  • (внешнее изменение)