Различия
Здесь показаны различия между двумя версиями данной страницы.
| Предыдущая версия справа и слева Предыдущая версия | |||
|
spdgrams:ree_pm_sun_wm_taylor [2025/09/09 12:16] f0ma |
spdgrams:ree_pm_sun_wm_taylor [2025/09/09 12:16] (текущий) f0ma |
||
|---|---|---|---|
| Строка 67: | Строка 67: | ||
| oib <- c(oib, subset(cmp, element == n)$OIB); | oib <- c(oib, subset(cmp, element == n)$OIB); | ||
| - | cr <- data.frame(rbind(lcrust,ucrust,oib)); | + | cr <- data.frame(rbind(lcrust,ucrust)); |
| names(cr) <- c(paste0(ns,'_ppm')); | names(cr) <- c(paste0(ns,'_ppm')); | ||
| Строка 85: | Строка 85: | ||
| ret <- c(); | ret <- c(); | ||
| - | values <- cbind(c(ppm_data$Name, "Lower Crust", "Upper Crust", "OIB"), rowApply(`/`,ds,pmsc)); | + | values <- cbind(c(ppm_data$Name, "Lower Crust", "Upper Crust"), rowApply(`/`,ds,pmsc)); |
| names(values)[1] <- 'Name'; | names(values)[1] <- 'Name'; | ||