R 语言画图 离轴坐标

离轴坐标图是指坐标轴不是按照传统的直角坐标系绘制，而是沿某个方向偏移，以突出数据的某些特性或关系。在 R 语言中，可以使用 ggplot2 包绘制离轴坐标图。

下面是一个简单的例子，展示如何绘制离轴坐标图：

library(ggplot2)

# 生成数据
set.seed(123)
df <- data.frame(x = rnorm(100), y = rnorm(100))

# 绘制离轴坐标图
ggplot(df, aes(x = x, y = y)) +
  geom_point() +
  coord_flip() +  # 翻转坐标轴
  theme_classic() +
  theme(
    axis.line.y = element_blank(),  # 隐藏 y 轴
    axis.ticks.y = element_blank(),  # 隐藏 y 轴刻度
    axis.text.y = element_blank()  # 隐藏 y 轴标签
  ) +
  geom_segment(
    aes(x = -Inf, y = 0, xend = Inf, yend = 0),  # 绘制 x 轴
    size = 0.5, color = "black"
  ) +
  geom_segment(
    aes(x = 0, y = -Inf, yend = Inf, xend = 0),  # 绘制 y 轴
    size = 0.5, color = "black"
  ) +
  geom_smooth(
    method = "lm", formula = y ~ x,  # 绘制回归线
    se = FALSE, color = "red"
  )

这段代码首先生成了一个包含两个正态分布随机变量的数据框 df，然后使用 ggplot 函数初始化图形，设置 x 和 y 坐标为 df 中的变量，绘制散点图。接着使用 coord_flip 函数翻转坐标轴，隐藏 y 轴的线、刻度和标签，绘制 x 和 y 轴的线段。最后使用 geom_smooth 函数绘制回归线。结果如下图所示：

![离轴坐标图](https://img-blog.csdnimg.cn/20211010182415632.png