如何解决ggplot:添加带有轴刻度的绘图轮廓
我正在尝试创建图,其中 x 轴也出现在图上方以及图右侧的 y 轴。两者都应包含与法线轴相同的刻度,但不是轴文本。这应该会产生一个“框”,在图周围带有有用的刻度线。我还希望在没有标签的主要刻度(已标记)之间有较小的刻度。这是我画的图:
我还用粉红色画出了我想在 R 中实现的目标:
]3我的这个情节的代码:
p <- p + xlab("") + ylab("") + theme(legend.position = "none") + theme(axis.ticks.length = unit(-0.25,"cm"),axis.text.x = element_text(size = 30,hjust=1)) + theme(axis.text.y = element_text(size=35,hjust = 1),strip.text = element_text(size=35),axis.title.y = element_text(size = 40),legend.text = element_text(size=30),axis.title.x = element_text(size=40),legend.title = element_text(size=45))
p <- p + theme(text = element_text(family = "Helvetica")) + scale_x_continuous(limits=c(-0.5,25),breaks = c(0,2,4,6,8,24)) + theme(legend.background = element_rect(color = "black",linetype = "solid")) + scale_colour_manual(values = cbpallette)
p <- p + theme(legend.key.size = unit(2.5,"cm")) + theme(axis.text.x = element_text(margin = margin(t = .5,unit = "cm")),axis.text.y = element_text(margin = margin(r = .5,unit = "cm")))
p
*** 编辑 *** 这是更新的代码,使用 Stefans 建议。图看起来是这样,刻度线在那里,轴不见了:
p <- p + xlab("") + ylab("") + theme(legend.position = "none") + theme(axis.ticks.length = unit(-0.25,hjust = 1,angle=45),axis.title.x = element_text(size=40))
p <- p + theme(text = element_text(family = "Helvetica")) + scale_colour_manual(values = cbpallette)
p <- p + theme(axis.text.x = element_text(margin = margin(t = .5,unit = "cm")))
p
解决方法
您可以使用参数 recvfrom
为两个比例复制轴,如下所示:
sec.axis = dup_axis()
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。