Как менять цвета в этот тип графика?

Поскольку я могу изменять мой код этих треугольных графиков, чтобы мочь менять им цвета, чтобы мочь получать график в лучших условиях, где он говорит среду, это любая дата линий x колонны:

library (adespatial)
library (ade4)
library (betapart)
if (require(ade4, quietly = TRUE))
data(habitat)
habitat.pod.J <- beta.div.comp(habitat, coef = "J", quant = FALSE)
# Sorensen
habitat.pod.S <- beta.div.comp(habitat, coef = "S", quant = FALSE)
# Ruzicka
habitat.pod.qJ <- beta.div.comp(habitat, coef = "J", quant = TRUE)
# Percentage difference
habitat.pod.qS <- beta.div.comp(habitat, coef = "S", quant = TRUE)
# Data frames for the triangular plots
# Data frames for the triangular plots
habitat.pod.J.3 <- cbind((1-habitat.pod.J$D),
habitat.pod.J$repl,
habitat.pod.J$rich)
colnames(habitat.pod.J.3) <- c("Similarity", "Repl", "RichDiff")
habitat.pod.S.3 <- cbind((1-habitat.pod.S$D),
habitat.pod.S$repl,
habitat.pod.S$rich)
colnames(habitat.pod.S.3) <- c("Similarity", "Repl", "RichDiff")
habitat.pod.qJ.3 <- cbind((1-habitat.pod.qJ$D),
habitat.pod.qJ$repl,
habitat.pod.qJ$rich)
colnames(habitat.pod.qJ.3) <- c("Similarity", "Repl", "AbDiff")
habitat.pod.qS.3 <- cbind((1-habitat.pod.qS$D),
habitat.pod.qS$repl,
habitat.pod.qS$rich)
colnames(habitat.pod.qS.3) <- c("Similarity", "Repl", "AbDiff")
par(mfrow = c(2, 2))
triangle.plot(as.data.frame(habitat.pod.J.3[, c(3, 1, 2)]),
show = FALSE,
labeltriangle = FALSE,
addmean = TRUE
)
text(-0.45, 0.5, "RichDiff", cex = 1.5)
text(0.4, 0.5, "Repl", cex = 1.5)
text(0, -0.6, "Jaccard similarity", cex = 1.5)
triangle.plot(as.data.frame(habitat.pod.S.3[, c(3 ,1 ,2)])

Пожалуйста помогите мне, как я могу изменять ему цвета для того, чтобы он не вышел черным, и если возможно способствовать тому, чтобы они вышли с буквой Тайм Нев Романн

0
задан 03.11.2019, 23:05
1 ответ

К сожалению у triangle.plot() есть очень мало выборов customizaciГіn, однако ты можешь устанавливать конечный цвет посредством нее funciГіn par(), который является той, которая используется, чтобы устанавливать выборы из-за d introducir la descripción de la imagen aquí эффект всех функций graficaciГіn основание. Например:

data(euro123)
op <- par(col = "red") # Color por defecto 
plot <- triangle.plot(euro123$in78, clab = 0, cpoi = 2, addmean = TRUE, show = FALSE)
par(op) # Restauramos la configuración inicial

, Если ты себе кажешься очень ограниченной выборы, смоги делать две вещи:

  1. Переделывать ее funciГіn triangle.plot(), мало lГ-neas cГіdigo и только habrГ - в который добавлять customizaciГіn цвета в призывах к points(), segments() и text()

  2. Идти в ggterm, которых один grГЎfica сходный но собранная на ggplot2

0
ответ дан 01.12.2019, 12:52
  • 1
    Но дело в том, что не, как делание этого типа grá fico с ggtern – Asiel Cabrera Guerrero 07.11.2019, 21:36

Теги

Похожие вопросы