改變離散x尺度的順序我正在用具有離散x比例尺的ggmap制作一個(gè)隱藏的條形圖,x軸現(xiàn)在是按字母順序排列的,但是我需要重新排列它,使它按y軸的值排序(也就是說,最高的條形線將位于左邊)。我試過排序或排序,但是結(jié)果是對(duì)x軸進(jìn)行排序,而不是分別對(duì)條形進(jìn)行排序。我做錯(cuò)了什么?
3 回答

阿波羅的戰(zhàn)車
TA貢獻(xiàn)1862條經(jīng)驗(yàn) 獲得超6個(gè)贊
library(ggplot2)# Automatic levelsggplot(mtcars, aes(factor(cyl))) + geom_bar()
# Manual levelscyl_table <- table(mtcars$cyl)cyl_levels <- names(cyl_table)[order(cyl_table)]mtcars$cyl2 <- factor(mtcars$cyl, levels = cyl_levels)# Just to be clear, the above line is no different than:# mtcars$cyl2 <- factor(mtcars$cyl, levels = c("6","4","8"))# You can manually set the levels in whatever order you please. ggplot(mtcars, aes(cyl2)) + geom_bar()
reorder
mtcars$cyl3 <- with(mtcars, reorder(cyl, cyl, function(x) -length(x)))ggplot(mtcars, aes(cyl3)) + geom_bar()

守著一只汪
TA貢獻(xiàn)1872條經(jīng)驗(yàn) 獲得超4個(gè)贊
limits
scale_x_discrete
ggplot(mtcars, aes(factor(cyl))) + geom_bar() + scale_x_discrete(limits=c(8,4,6))

墨色風(fēng)雨
TA貢獻(xiàn)1853條經(jīng)驗(yàn) 獲得超6個(gè)贊
reorder
:
qplot(reorder(factor(cyl),factor(cyl),length),data=mtcars,geom="bar")
編輯:
qplot(reorder(factor(cyl),factor(cyl),function(x) length(x)*-1), data=mtcars,geom="bar")
- 3 回答
- 0 關(guān)注
- 841 瀏覽
添加回答
舉報(bào)
0/150
提交
取消