Question

我想在我相当于x价值(74至76岁)和28至32年价值(28至32岁)的平方位和纵向界限。以下是我的《区域法典》。但是,当我管理以下活动时,我会得到一些层次的探索,但没有线索。我还从R中找不到错误。我安装上的缺省主题是向ink和yan看的。我也尝试利用小组的职能,但没有这样做。

levelplot(d_fire_count_nom ~ longitude + latitude | factor(day)+factor(year), 
          data = asia,
          subset = (month == 10),  aspect="iso", contour = FALSE, layout=c(1,1), 
          main="If a fire occured in a region (low confidence) in October during 2001-2008", 
          scales=list(x=list(at=seq(from=60,to=98, by=1)), 
                      y=list(at=seq(from=5,to=38,by=1)),cex=.7, alternating=3), 
          xlim=c(60, 98), ylim=c(5, 38),
          abline=list(h=74:76, v=28:32, col="grey"))

Answer 1

That s not how lattice graphics work. In fact, if you read ?levelplot you ll see that there is no argument to that function called abline, so I m not sure where you got that syntax from.

页: 1 更改<代码>panel功能的图表。有许多<代码>panel.*功能,可以做各种事情,如点 plot点、线、散射机等。在这种情况下,我们想要使用的是<代码>panel.abline。因此,我们界定了自己的<代码>panel功能。

采用<代码>第1个例子:

x <- seq(pi/4, 5 * pi, length.out = 100)
y <- seq(pi/4, 5 * pi, length.out = 100)
r <- as.vector(sqrt(outer(x^2, y^2, "+")))
grid <- expand.grid(x=x, y=y)
grid$z <- cos(r^2) * exp(-r/(pi^3))
levelplot(z~x*y, grid,
        panel = function(...){
            panel.levelplot(...)
            panel.abline(h = 2.5)
            panel.abline(v = 2.5)
        }, 
        cuts = 50, scales=list(log="e"), xlab="",
        ylab="", main="Weird Function", sub="with log scales",
        colorkey = FALSE, region = TRUE)

我们的新小组职能首先需要利用这一层次,因此,我们首先要使用<条码>。然后,我们要添加一些行文,为此添加<条码>panel.abline。

友情链接