在ggplot和facet中反轉Y軸

我有一個數據集包含從0到140的深度數據，其他列包含一些百分比。我使用ggplot和facet來繪製數據，除了座標軸底部的y軸（深度）處的零點外，它非常棒。我希望這個零點位於y軸的頂部。在ggplot和facet中反轉Y軸

這是示例中的數據：

log <- structure(list(Depth = c(5,10,15,20,25,30,35,40,45,50,55, 60,65,  70,75,80, 85,90, 95,100,105,110,115,120,125,130,135,140), mic1 = c(16.93548387,13.55932203, 6.034482759,33.6, 26.8907563, 51.47928994, 24.29906542,16.84210526, 26.14379085, 19.72318339,21.77419355,53.33333333,50.56179775,19.07514451,27.63819095, 25.6, 23.56687898, 19.04761905, 43.33333333,36.30952381,62.45059289,20.43010753,32.23140496,16.4021164,47.48201439,48.73646209,17.44186047, 39.04109589), mic2 = c(16.93548387, 13.55932203, 6.034482759,33.6, 26.8907563, 51.47928994, 24.29906542,16.84210526, 26.14379085, 19.72318339,21.77419355,53.33333333,50.56179775,19.07514451,27.63819095, 25.6, 23.56687898, 19.04761905, 43.33333333,36.30952381,62.45059289,20.43010753,32.23140496,16.4021164,47.48201439,48.73646209,17.44186047, 39.04109589)), .Names = c("Depth", "f1", "f2"), row.names = c(NA, 20L), class = "data.frame")

我使用這個代碼繪製他們在酒吧：

logMelt1 <- melt(log, id.vars="Depth") 
logm <- ggplot(logMelt1, aes(x=Depth, y=value)) + geom_bar(stat = 'identity') + coord_flip() + facet_grid(~ variable, scale ='free_x') 
logm

as you can see the Depth axis start from the bottom

我想知道我怎麼能翻領的深度軸，所以0將從頂部開始？

來源

2016-10-20 Majed86

也許嘗試：

logm <- ggplot(logMelt1, aes(x=Depth, y=value)) + 
    geom_bar(stat = 'identity') + 
    scale_x_reverse() + 
    coord_flip() + 
    facet_grid(~ variable, scale ='free_x')

扭轉軸？

來源

2016-10-20 20:47:29 joran

在ggplot和facet中反轉Y軸

回答

相關問題