我正在为一个项目做一些绘图,它们需要有特定的外观。它们需要在轴线和绘图面板之间有一些空间。
library(ggplot2)
plot_data <- data.frame(X = 1:10, Y = 1:10)
ggplot() + geom_point(data = plot_data, aes(x = X, y = Y)) +
theme(axis.line = element_line(colour = "black", linetype = "solid"))
我有什么
我想在绘图的 X 轴和 Y 轴之间添加一些距离,但我的轴线不会扩展,就像我使用扩展命令时一样。
plot_data <- data.frame(X = 1:10, Y = 1:10)
ggplot() + geom_point(data = plot_data, aes(x = X, y = Y)) +
theme(axis.line = element_line(colour = "black", linetype = "solid"))+
scale_x_continuous(name = "X", limits = c(1, 10), expand = c(0.1,0)) +
scale_y_continuous(name = "Y", limits = c(1, 10), expand = c(0.1,0))
我能做什么
在 R 中是否有快速可靠的方法来做到这一点?
我想要什么
先谢谢大家了!
最佳答案
您可以使用 lemon
包实现行的这种“限制”。您可以使用以下代码来实现此目的:
library(ggplot2)
library(lemon)
### your code
plot_data <- data.frame(X = 1:10, Y = 1:10)
p <- ggplot() + geom_point(data = plot_data, aes(x = X, y = Y)) +
theme(axis.line = element_line(colour = "black", linetype = "solid"))+
scale_x_continuous(name = "X", limits = c(1, 10), expand = c(0.1,0)) +
scale_y_continuous(name = "Y", limits = c(1, 10), expand = c(0.1,0))
### using the lemon package
p + coord_capped_cart(bottom='right', left='none', gap = 0.15)
### mimic the view of your plot
p2 <- p + coord_capped_cart(bottom='right', left='none', gap = 0.15)
p2 + theme(panel.background = element_rect(fill = "white"))
产生以下图片:
关于r - 添加空格/增加 ggplot 中 X 轴和 Y 轴之间的间距,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/61479255/