Я пытаюсь установить ось глубины на шкале, но после нескольких попыток я не могу.
Вот код, позволяющий мне для генерации графика:
MOZ_Echt <- subset_samples(MOZ, corebis == "CSF_04" | corebis == "MTB_03" | corebis == "MTB_05" | corebis == "CSF_19")
plot_bar(MOZ_Echt,fill="Domain",x="depth")+xlab("Depth (cm)")+scale_y_continuous(labels = scales::percent)+ facet_wrap(~corebis, scales = "free_x", ncol=2) + geom_bar(stat="identity", position="stack") + coord_flip() + scale_x_discrete(limits=c("878", "818", "718", "696", "646", "618", "596", "518", "418", "396", "346", "318", "296", "246", "218", "196", "131", "118", "18","13.5","8.5","5","3","1.5","0.5"))
Кроме того, я хотел бы, если возможно, поставить MTBO3 и CSF04 на одном графике также для MTB05 и CSF19.
Можете ли вы мне помочь?
Спасибо