我需要用包含(真实)希腊字母和四舍五入到 2 个小数位的数字的行注释 ggplot2 图上的一个位置。我的问题出现是因为我想显示小数位，即使它们都为零。不幸的是，parse = T设置在 annotate转换字符串 "1.00"进入 "1" .下面是一个具体的例子:
alpha_num <- "1.00"
p <- ggplot(data.frame(x=1,y=1,label=paste0("alpha == ", alpha_num)))
p <- p + geom_text(aes(x,y,label=label), parse = TRUE, size = 30)
上面的代码产生以下图:
我如何获得
alpha_num完整显示？
最佳答案
您可以使用 deparse 来做到这一点。 .
所以你的代码看起来像这样
alpha_num <- "1.00"
p <- ggplot(data.frame(x=1,y=1,label=paste0("alpha == ", alpha_num)))
# Use deparse in label
p <- p + geom_text(aes(x,y,label=paste0("alpha == ", deparse(alpha_num))), parse = TRUE, size = 30)
p
输出是:
关于r - 停止解析ggplot2注释中小数点后的零，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/43104021/