我想使用facet_grid将一些条形图绘制在彼此之上:
library(ggplot2)
df <- group_by(mpg, manufacturer) %>%
summarise(cty = mean(cty), hwy = mean(hwy)) %>%
ungroup()
df <- melt(df, id.vars = "manufacturer")
ggplot() +
geom_bar(data =df, aes(x = variable, y = value), stat = "identity") +
facet_grid(manufacturer ~ ., switch = "y")
我使用switch
参数ggplot2::facet_grid()
来让facet标签显示在y轴而不是每个facet的顶部。问题是刻面标签是垂直绘制的,因此会被裁剪。有没有办法水平绘制facet -labels?到目前为止,我发现的所有问题仅与旋转x轴标签有关,而不是与刻面标签有关。
发布于 2019-06-06 15:10:42
您只需要添加theme()
并指定角度strip.text.y
library(ggplot2)
df <- group_by(mpg, manufacturer) %>%
summarise(cty = mean(cty), hwy = mean(hwy)) %>%
ungroup()
df <- melt(df, id.vars = "manufacturer")
ggplot() +
geom_bar(data =df, aes(x = variable, y = value), stat = "identity") +
facet_grid(manufacturer ~ ., switch = "y")+
theme(strip.text.y = element_text(angle = 180))
https://stackoverflow.com/questions/-100005187
复制相似问题