dados <- read.table(text='Classe 0-10 10-20
Mata_Nativa 10.046667 7.600000
Citrus_37 12.363333 23.126667
Citrus_37 15.326667 27.580000
Citrus_24 4.380000 8.856667
Citrus_18 10.430000 21.576667
Citrus_31 9.196667 18.036667
Pasto_37 6.690000 12.533333', header=TRUE) # Lendo os dados. Pelo que eu entendi, tu tem um banco levemente diferente ()
dados <- cbind(dados, id=1:nrow(dados)) # Já qie tem 2 'Citrus 31', tive que criar uma variavel auxiliar como id, se nao usaria a variavel 'Classe'
dados <- reshape(dados, varying=list(c('X0.10', 'X10.20')), direction='long', idvar='id', timevar='Camada', times=c('0 - 10', '10 - 20'))
require(ggplot2)
ggplot(aes(x=Classe, y=X0.10, fill=Camada), data=dados) + geom_bar(position='dodge', stat='identity')