Estoy intentando hacer un gráfico triangular a partir de los valores de beta diversidad, de manera que me quede en uno un gráfico triangular para una familia con puntos de colores para cada columna y en otro lo mismo para la otra familia. Ya sea usando la función ggplot, ggtern u otra. Pudieran ayudarme por favor o darme alguna sugerencia. Gracias de antemano
Adjunto parte de la matriz
Regiones βjtu βjne βjac
I-II 0.85 0.05 0.90
I-III 0.78 0.02 0.80
I-IV 0.44 0.24 0.68
I-V 0.77 0.08 0.85
I-VI 0.85 0.02 0.85
I-VII 0.85 0.09 0.81
II-III 0.88 0.03 0.91
II-IV 0.51 0.32 0.85
II-V 0.88 0.04 0.89
II-VI 0.88 0.02 0.91
II-VII 0.91 0.02 0.91
Y el código que estoy probando
library (vegan)
library (betapart)
library (ggtern)
## Raw data and plotting data(nn)
m <- betadiver(nn)
plot(m,col=2)
## The indices betadiver(help=TRUE)
## The basic Whittaker index
d <- betadiver(sipoo, "w")
## This should be equal to Sorensen index (binary Bray-Curtis in ## vegan)
range(d - vegdist(nn, binary=TRUE))
Pero no se como darle la escala de colores a cada columna, ni como ajustar la escala que convencionalmente viene entre o y 100, y mis valores están entre o y 1.