plot：轴上的小数点精度

Question

我有两列数据，X和Y，每个条目在两个向量中的小数点后面都有4个数据位。

当我使用plot(x,y)创建简单绘图时，轴的数据显示小数点后2位精度。如何在两个轴上将其更改为4小数点精度？

我添加了下面的示例数据（inputData），我使用plot(inputData)绘制了这些数据。

inputData=structure(list(X = c(33.73521973, 33.622022, 33.63591706, 33.58184488, 
33.73027696, 33.76169838), Y = c(-112.2559051, -112.2396135, 
-112.2345327, -112.2441752, -112.2463008, -112.3298128)), .Names = c("X", 
"Y"), row.names = c(NA, 6L), class = "data.frame")

我想在上面的数据集中找到一个可重现的例子，以及建议答案的一部分。

> inputData
         X         Y
1 33.73522 -112.2559
2 33.62202 -112.2396
3 33.63592 -112.2345
4 33.58184 -112.2442
5 33.73028 -112.2463
6 33.76170 -112.3298

Answer 1

一个选项是使用axis来自定义标签。这里使用默认的绘图轴和使用axis函数对相同的绘图进行比较。

op <- par(mfrow = c(2,1))
set.seed(1)
rr <- rnorm(5)
plot(rr, 1:5,  frame.plot = TRUE)
plot(rr, 1:5, axes = FALSE, frame.plot = TRUE)
my.at <- round(rr,4)
axis(1, at = my.at, labels = my.at)