r - 具有重复标签的ggplot轴自定义顺序

Question

set.seed(357)
x <- data.frame(name = sample(letters, 10), val = runif(10), stringsAsFactors = F)
x[c(2,6),"name"] <- c("k","k")
ggplot(x, aes(x = name, y = val)) + theme_bw() + geom_bar(stat = "identity")

如何以与 x$name 相同的顺序绘制轴？ (是的，k是重复的，我希望它像这个轴一样显示在图中:c k g f o k s v t q)

过去我经常这样做:

x$name <- factor(x$name, levels = x$name[order(x$val)], ordered = T)

由于以下原因，它不再起作用: http://r.789695.n4.nabble.com/factors-with-non-unique-quot-duplicated-quot-levels-have-been-deprecated-since-2009-are-more-depreca-td4721481.html

这不重复:ggplot: order of factors with duplicate levels他的数据结构完全不同。

此外，我尝试在 x_scale_discrete 中设置限制。不起作用。

Answer 1

试试这个...

x$name2 <- 1:nrow(x)
ggplot(x, aes(x = factor(name2), y = val)) + theme_bw() + geom_bar(stat = "identity") + 
             scale_x_discrete(labels=x$name)