在R中，如何设置x轴的中断？

Question

说这是我的代码：

plot(data ylab="x", xlab="y", xlim=c(1, 13))

但是绘图的x轴显示如下：

如您所见，x轴从2到12乘2表示。但是，我希望从1到13乘1步显示x轴，我如何实现呢？

Answer 1

您已经定义了轴的极限。 但是，R正在为其插入“默认”值。

要更改它们，您需要

1. 使用xaxt='n' “覆盖”轴的创建
2. 定义自定义轴

所以，让我们完成它！

plot(data, ylab="x", xlab="y", xlim=c(1, 13), xaxt='n')
# Now, define a custom axis
axis(side = 1, at=1:13)

这会给你你想要的。

---

从文档中， axis() ：

描述

在当前图上添加一个轴，从而可以指定边，位置，标签和其他选项。

用法

axis(side, at = NULL, labels = TRUE, tick = TRUE, line = NA, pos = NA, outer = FALSE, font = NA, lty = "solid", lwd = 1, lwd.ticks = lwd, col = NULL, col.ticks = NULL, hadj = NA, padj = NA, ...)

一些最常用的参数是：

• side （整数）1 =下方，2 =左侧，3 =上方和4 =右侧。
• at该刻度标记（矢量）的位置
• 刻度线的labels （矢量）标签。 所述载体必须是相同的大小at 。 如果省略，将使用at的值。 FALSE隐藏任何标签

---

有用的参考资料：

• Quick-R教程 | 轴和文字

Answer 2

看看下面的代码： http : //cran.r-project.org/doc/contrib/Lemon-kickstart/axbreak.R

您必须提供该文件的源代码才能使用该功能：

source('http://cran.r-project.org/doc/contrib/Lemon-kickstart/axbreak.R')
axis.break(axis=1,breakpos,bgcol="white",breakcol="black", style=c("slash","zigzag"),brw=0.02)

适应您的喜好。