我有一個(gè)data.frame，從最高到最低排序。例如：x <- structure(list(variable = structure(c(10L, 6L, 3L, 4L, 2L, 8L, 9L, 5L, 1L, 7L), .Label = c("a", "b", "c", "d", "e", "f", "g", "h", "i", "j"), class = c("ordered", "factor")), value = c(0.990683229813665, 0.975155279503106, 0.928571428571429, 0.807453416149068, 0.717391304347826, 0.388198757763975, 0.357142857142857, 0.201863354037267, 0.173913043478261, 0.0496894409937888)), .Names = c("variable", "value"), row.names = c(10L, 6L, 3L, 4L, 2L, 8L, 9L, 5L, 1L, 7L), class = "data.frame")ggplot(x, aes(x=variable,y=value)) + geom_bar(stat="identity") + scale_y_continuous("",label=scales::percent) + coord_flip() 現(xiàn)在，數(shù)據(jù)很好并且可以排序，但是當(dāng)我繪制圖表時(shí)，它是按因子排序的。這很煩人，我該如何解決？
3 回答
夢(mèng)里花落0921
TA貢獻(xiàn)1772條經(jīng)驗(yàn) 獲得超6個(gè)贊
這有兩種方法。
第一個(gè)將根據(jù)數(shù)據(jù)框中顯示的順序?qū)κ挛镞M(jìn)行排序：
x$variable <- factor(x$variable, levels=unique(as.character(x$variable)) )
第二個(gè)命令基于另一個(gè)變量（在這種情況下為值）對(duì)級(jí)別進(jìn)行排序：
x <- transform(x, variable=reorder(variable, -value) )
慕慕森
TA貢獻(xiàn)1856條經(jīng)驗(yàn) 獲得超17個(gè)贊
這似乎是您要找的東西：
g <- ggplot(x, aes(reorder(variable, value), value))
g + geom_bar() + scale_y_continuous(formatter="percent") + coord_flip()
該reorder()功能將根據(jù)重新排序x軸的項(xiàng)目value的variable。
- 3 回答
- 0 關(guān)注
- 2737 瀏覽
添加回答
舉報(bào)
0/150
提交
取消