Eu tenho o seguinte dataframe:

 Catergory        Reason Species
1   Decline       Genuine      24
2  Improved       Genuine      16
3  Improved Misclassified      85
4   Decline Misclassified      41
5   Decline     Taxonomic       2
6  Improved     Taxonomic       7
7   Decline       Unclear      41
8  Improved       Unclear     117

Eu estou tentando fazer um gráfico de barras agrupadas, espécies como altura e, em seguida, duas cores para a categoria.

Eu colocaria uma imagem do que tenho, mas não tenho pontos de reputação suficientes ... mas aqui está o meu código:

Reasonstats<-read.csv("bothstats.csv")
Reasonstats2<-as.matrix(Reasonstats[,3])


barplot((Reasonstats2),beside=T,col=c("darkblue","red"),ylab="number of 
species",names.arg=Reasonstats$Reason, cex.names=0.8,las=2,space=c(0,100)
,ylim=c(0,120))
box(bty="l")

Agora, o que eu quero é não ter que rotular as duas barras duas vezes e agrupá-las separadamente. Tentei alterar o valor do espaço para todos os tipos de coisas e isso não parece separar as barras. Alguém pode me dizer o que estou fazendo errado?