如何解决点未在 ggplot 1-column facet wrap 的 x 轴上对齐
time1 <- c(
as.POSIXlt("2021-05-02 23:57:29"),as.POSIXlt("2021-05-02 23:58:29"),as.POSIXlt("2021-05-02 23:59:29"),as.POSIXlt("2021-05-03 11:06:00"),as.POSIXlt("2021-05-03 11:07:00"),as.POSIXlt("2021-05-03 11:08:00")
)
time2 <- c(
as.POSIXlt("2021-05-02 23:59:29"),as.POSIXlt("2021-05-03 11:08:00"),as.POSIXlt("2021-05-03 11:08:00")
)
grp <- c("A","B","C","A","C")
cnt <- c(29,1,30,31,2,33)
df1 <- data.frame(time1,grp,cnt)
df2 <- data.frame(time2,cnt)
p1 <- ggplot(df1,aes(x = time1,y = cnt,color = grp)) +
geom_jitter(size = 1.0,show.legend = FALSE) +
facet_wrap(~grp,ncol = 1,shrink = FALSE)
p2 <- ggplot(df2,aes(x = time2,shrink = FALSE)
绘图 p1 显示了按照它们的 time1 值对齐的点。在图 p2 中,点未对齐。
解决方法
当您输入 ?geom_jitter
时,您会看到点位置会随机变化:
jitter geom 是 geom_point(position = “抖动”)。它为位置添加了少量随机变化 每个点,并且是处理由 较小数据集中的离散性。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。