具体来说,这是在facet_grid 中。在谷歌上广泛搜索了类似的问题,但不清楚语法或它的去向。我想要的是 y 轴上的每个数字在小数点后都有两位数,即使尾随一位是 0。这是scale_y_continuous 或 element_text 中的参数还是...?
row1 <- ggplot(sector_data[sector_data$sector %in% pages[[x]],], aes(date,price)) + geom_line() +
geom_hline(yintercept=0,size=0.3,color="gray50") +
facet_grid( ~ sector) +
scale_x_date( breaks='1 year', minor_breaks = '1 month') +
scale_y_continuous( labels = ???) +
theme(panel.grid.major.x = element_line(size=1.5),
axis.title.x=element_blank(),
axis.text.x=element_blank(),
axis.title.y=element_blank(),
axis.text.y=element_text(size=8),
axis.ticks=element_blank()
)
来自帮助?scale_y_continuous
,参数 'labels' 可以是一个函数:
标签之一:
NULL 表示没有标签
waiver() 用于由转换对象计算的默认标签
给出标签的字符向量(必须与中断长度相同)
将中断作为输入并返回标签作为输出的函数
我们将使用最后一个选项,该函数需要breaks
作为参数并返回一个保留 2 位小数的数字。
#Our transformation function
scaleFUN <- function(x) sprintf("%.2f", x)
#Plot
library(ggplot2)
p <- ggplot(mpg, aes(displ, cty)) + geom_point()
p <- p + facet_grid(. ~ cyl)
p + scale_y_continuous(labels=scaleFUN)
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)