创建自己的标签并将其传递给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
)
)
)
Run Code Online (Sandbox Code Playgroud)
对于格式化步骤,有很多替代方案formatC.看看format,prettyNum并sprintf让你开始.
如果您想使用日期执行此操作,请注意为此目的scales接受format参数.