在R中绘制问题

Question

我创建了一个包含四个不同行的数据框。每行的数字都在减少。但是我对图中的情节有一些问题：

情节的一切都是正确的，除了灰色条是错误的方式。实际上他们必须上升。

这是语法：

plot(z_RMSE_MAE$max_diff, z_RMSE_MAE$z_images_left, col.lab="black",yaxt='n',type = "o", xlab = "max Differenz", ylab ="", main ="",col = "red") 
axis(4, col = "red")
par(new = T)
barplot(z_RMSE_MAE$z_MAE, type= "h", col = "grey",xlab ="", ylab = "",space = 0.8, density = 40, decreasing ="FALSE")
mtext(side = 2, line = 3, col = "grey" ,'MAE')
mtext(side = 4, line = 3, col = "red" ,'images left')
axis(side = 2 )

有人可以帮助我吗？