对齐各个条上的数字 [英] Alignment of numbers on the individual bars

问题描述

我需要在 ggplot 上的条形上方放置标签.我曾经使用找到的方法(HERE) 但这似乎不再起作用，因为我的 ggplot2 更新，因为我现在收到错误消息:

continuous_scale(c("y", "ymin", "ymax", "yend", "yintercept", :未使用的参数(格式化程序 =百分比")

如何在使用示例时再次在条形图上方绘制数值:

df <-结构(列表(A =结构(c(1L，1L，1L，2L，2L，2L，3L，3L，3L), .Label = c("0-50,000", "50,001-250,000", "250,001-Over"), class = "factor"),B = 结构(c(1L, 2L, 3L, 1L, 2L, 3L, 1L, 2L, 3L), .Label = c("0-50,000","50,001-250,000", "250,001-Over"), class = "factor"), Freq = c(0.507713884992987,0.258064516129032, 0.23422159887798, 0.168539325842697, 0.525280898876405,0.306179775280899, 0.160958904109589, 0.243150684931507,0.595890410958904)), .Names = c("A", "B", "Freq"), class = "data.frame", row.names = c(NA,-9L))图书馆(ggplot2)ggplot(data=df, aes(x=a, y=freq))+geom_bar(aes(fill=B), position = position_dodge()) +geom_text(aes(label = paste(sprintf("%.1f", Freq*100), "%", sep=""),y = 频率+0.015, x=A),尺寸 = 3，位置 = position_dodge(width=0.9)) +scale_y_continuous(formatter = "percent") +主题_bw()

在 win 7 机器上运行 R 2.15 ggplot2 0.9

解决方案

错误来自 scale_y_continuous 调用.标签的格式现在由 labels 参数处理.有关详细信息，请参阅 ggplot2 0.9.0 转换指南.>

标签没有正确排列还有另一个问题；我通过为 geom_text 添加一个 group=B 来解决这个问题；不过，我不太确定为什么这是必要的.我还从 geom_text 美学中取出了 x=A 因为不需要它(它将从 ggplot 调用继承.

library("ggplot2")图书馆(秤")ggplot(data=df, aes(x=a, y=freq))+geom_bar(aes(fill=B), position = position_dodge()) +geom_text(aes(label = paste(sprintf("%.1f", Freq*100), "%", sep=""),y = Freq+0.015, group=B),尺寸 = 3，位置 = position_dodge(width=0.9)) +scale_y_continuous(标签=百分比)+主题_bw()

I have the need to place labels above bars on ggplot. I used to use the method found (HERE) but this does not appear to work anymore since my ggplot2 update as I now get the error message:

Error in continuous_scale(c("y", "ymin", "ymax", "yend", "yintercept",  : 
  unused argument(s) (formatter = "percent")

How can I again plot numeric values above the bars when using the example:

df <- structure(list(A = structure(c(1L, 1L, 1L, 2L, 2L, 2L, 3L, 3L,
3L), .Label = c("0-50,000", "50,001-250,000", "250,001-Over"), class = "factor"),
    B = structure(c(1L, 2L, 3L, 1L, 2L, 3L, 1L, 2L, 3L), .Label = c("0-50,000",
    "50,001-250,000", "250,001-Over"), class = "factor"), Freq = c(0.507713884992987,
    0.258064516129032, 0.23422159887798, 0.168539325842697, 0.525280898876405,
    0.306179775280899, 0.160958904109589, 0.243150684931507,
    0.595890410958904)), .Names = c("A", "B", "Freq"), class = "data.frame", row.names = c(NA,
-9L))

library(ggplot2)

ggplot(data=df, aes(x=A, y=Freq))+
    geom_bar(aes(fill=B), position = position_dodge()) + 
    geom_text(aes(label = paste(sprintf("%.1f", Freq*100), "%", sep=""),
                  y = Freq+0.015, x=A),
              size = 3, position = position_dodge(width=0.9)) +
    scale_y_continuous(formatter = "percent") +
    theme_bw()

Running R 2.15 ggplot2 0.9 on a win 7 machine

解决方案

The error is from the scale_y_continuous call. Formatting of labels is now handled by the labels argument. See the ggplot2 0.9.0 transition guide for more details.

There was another problem with the labels not lining up correctly; I fixed that by adding a group=B to the aesthetics for the geom_text; I'm not quite sure why this is necessary, though. I also took out x=A from the geom_text aesthetics because it was not needed (it would be inherited from the ggplot call.

library("ggplot2")
library("scales")

ggplot(data=df, aes(x=A, y=Freq))+
    geom_bar(aes(fill=B), position = position_dodge()) + 
    geom_text(aes(label = paste(sprintf("%.1f", Freq*100), "%", sep=""),
                  y = Freq+0.015, group=B),
              size = 3, position = position_dodge(width=0.9)) +
    scale_y_continuous(labels = percent) +
    theme_bw()

这篇关于对齐各个条上的数字的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！