A partir de un data frame donde se encuentran las especies de nematodos en distintos sitios intento realizar un cuadro con porcentajes para cada grupo trófico y esto representarlo en un diagrama ternario. Esto es lo que conseguí hacer:
library(soiltexture)
help(TT.plot)
mis.datos<-data.frame(
"Fitoparásitos"=c(8.77,58.05,7.36),
"Bacteriófagos"=c(91.23,41.95,91.57),
"Omnívoros"=c(0,0,1.07),
"Huella_de_carbono"=c(420.38,251.01,662.03)
)
TT.plot(
class.sys = "none",
lang = "es2",
main = "Huellas de carbono",
lwd.axis = 0.5,
cex.lab = 0.8,
cex.axis = 0.8,
css.names = c("Fitoparásitos","Bacteriófagos","Omnívoros"),
css.lab = c("Fitoparásitos","Bacteriófagos","Omnívoros"),
tri.data = mis.datos,
z.name = "Huella_de_carbono",
)
En este ejemplo yo tuve que calcular los porcentajes, la idea es evitar esto para automatizar el proceso. Saludos. Sá, Farid Leonel.
mis.datos<-data.frame("Fitoparasitos"=c(570,2297,768),"Bacteriófagos"=c(276,113,420),"Omnívoros"=c(0,0,5),"Huella_de_carbono"=c(420.38,251.01,662.03))