格式中的轴标签

Question

如何将我的轴标签以方便格式放入格中？

require(stats) 

xyplot(lat*1000000 ~ long, data = quakes) 

给我y标签像-3.5e+0.7。我想格子写整个数字。

（也许很容易，但我不能找到一个解决方案。）

预先感谢您！

Answer 1

有几个“全局选项”可能会影响如何打印值。在这种情况下，scipen是你想要移动的那个：

old_op <- options(scipen=10) 
xyplot(lat*1000000 ~ long, data = quakes) 
options(old_op) 
# probably better to restore it so the rest of you session is more "normal" 

Answer 2

创建您自己的标签并将它们传递给scales参数。

y_at <- pretty(quakes$lat*1e6) 
y_labels <- formatC(y_at, digits = 0, format = "f") 
xyplot(
    lat*1000000 ~ long, 
    data = quakes, 
    scales = list(
    y = list(
     at = y_at, 
     labels = y_labels 
    ) 
) 
) 

对于格式化步骤，formatC有很多替代方法。看看format，prettyNum和sprintf，让你开始。

---

如果你想与日期要做到这一点，那么请注意，scales接受format参数用于这一目的。