Inclinação do eixo x no diagrama de Wittaker

Olá Professor Marcos, tudo bem?

Eu fiz o gráfico do diagrama de Wittaker, mas não sei colocar o eixo x na posição diagonal ou inclinada.
Eu segui os passos das aulas do módulo 7 (aulas 7.2 e 7.3) e deu certo para dois tipos de métodos de banco de sementes (serrapilheira e topsoil) com a quantidade de plântulas emergentes (valores brutos) de acordo com as espécies. Não quero colocar os números da quantidade de espécies no diagrama. Então, o comando ficou assim:

par(mar=c(8,5,1,1))
barplot(abund.sp.ordem, ylab="Abundância", las=2, ylim=c(0, 25))
mtext("Espécies", side=1, line=6)

Se precisar de mais dados para entender, envie respostas. Não consegui inserir o gráfico.

Grata.
Luzia

Oi, Luzia!

Resgatando aqui a sua dúvida, desculpe pela demora.

Você pode usar o argumento srt para determinar os ângulos e deixar os rótulos inclinados. Veja os exemplos:

https://www.tutorialspoint.com/how-to-rotate-text-in-base-r-plot

https://stats.idre.ucla.edu/r/faq/how-can-i-change-the-angle-of-the-value-labels-on-my-axes/

Qualquer coisa vamos nos falando.

Abraços

Prezado Professor, tudo bem?

Eu não consegui fazer, pois eu quero que o eixo x (espécies) fique no ângulo de 45 graus.

Eu criei um argumento para retirar o eixo x e consegui, mas depois para retornar os números apareceram dentro do histograma e não apareceram as espécies do eixo x.

par(mar=c(8,5,1,1))
barplot(abund.sp.ordem, ylab="Abundância", las=2, ylim=c(0,20))
mtext("Espécies", side = 1, line=5)

mm = barplot(abund.sp.ordem, ylab="Abundância", las=2, ylim=c(0,22), xaxt = "n")
mtext("Espécies", side = 1, line=5)
text(mm, labels = abund.sp, srt = 45)

Grata.
Luzia

Oi, Luzia!

Veja o exemplo a seguir, e veja se você consegue adaptar para o seu caso:

Código:

##################
#Labels do eixo x na diagonal

library (vegan)

data (dune)

somas <- colSums(dune)
somas <- sort (somas, decreasing = T)

par (xaxt="n")
grafico<-barplot (somas, las=1, ylim=c(0, 70))
text (x=grafico+1.1, y=-3, srt=-45, pos=1, xpd=T, labels=names(somas), par("usr")[3] - 0.2)
##################