我正在将以下数据绘制到ggplot条形图中.
structure(list(MEDIATYPE = c("BACKLIT TOWER", "BILLBOARDS", "BRIDGE PANEL",
"BUILDING FACADES", "BUS SHELTER", "CANTILIVERS", "CYCLE SHELTER",
"FOB", "FREE STANDING PANEL", "GANTRIES"), RENTAL = c(197, 278363,
1423, 26, 35960, 6194, 70, 4845, 27, 9420)), .Names = c("MEDIATYPE",
"RENTAL"), row.names = c(NA, 10L), class = "data.frame")
我使用以下代码来呈现图表.它工作正常.但问题是yaxis值不断变化,图表顶部的注释有时会消失,或者在其他情况下会出现在图表的中间.
library(ggplot2)
library(stringr) # str_wrap
ggplot(b, aes(x=reorder(MEDIATYPE,-RENTAL), y=RENTAL, fill=MEDIATYPE)) + geom_bar(stat = "identity", width = 0.8) +
theme(legend.position = "none") + xlab("MEDIATYPE") + ylab("SPENDS") +
scale_x_discrete(labels = function(x) str_wrap(x, width = 1)) +
theme(axis.text.x = element_text(angle = …我正在ggplot中制作一些图形，并且在不指定x和y位置的情况下无法弄清楚如何在图形文本中进行绘制。
比方说，我在做这样的曲线图。
sp <- ggplot(mpg, aes(hwy, cty, label = "sometext"))+
geom_point()
我想在每个图形中添加以相同方式打印的标签。调用以下命令仅在提供给的每个x，y值处打印文本aes。
sp + geom_text()
我可以操纵提供的xy数据geom_text()以确保文本在图形之间保持相同的相对位置，但是有没有一种简单的方法可以通过默认位置（例如“顶部”，“底部”等）来调用位置？即sp + geom_text(position="top")。