2

我有以下 R 代码:

library(lattice)
x <- rep(seq(6,15,by=1), each=20)
y <- rep(seq(0,0.95,by=0.05), 10)
z <- x*y
levelplot(z ~ x * y)

它产生这个情节: 在此处输入图像描述

如何在 x 轴上的 6、7、...、15 处有刻度,在 y 轴上在 0.0、0.1、...、0.9 处有刻度?

4

1 回答 1

3
library(lattice)
x <- rep(seq(6,15,by=1), each=20)
y <- rep(seq(0,0.95,by=0.05), 10)
z <- x*y

x.scale <- list(at=seq(6,15,1))
y.scale <- list(at=seq(0,0.9,0.1))

levelplot(z ~ x * y, scales=list(x=x.scale, y=y.scale))

在此处输入图像描述

于 2015-06-04T09:50:46.290 回答