首页 文章

单面板格子图，右侧（和底部）有轴

提问于
浏览 次
2

看起来它应该是一件简单的事情，但是我在处理单个面板时 . 似乎这样必须要求调用 panel.axis ，但我的尝试导致错误，或没有投诉，但没有改变情节 .

library("lattice")
set.seed(123)
DF <- data.frame(x = runif(5), y = runif(5))

xyplot(y ~ x, data = DF) # default is axes labeled on left and bottom
r lattice

1 回答

  • 0

    我似乎无法找到更直接的方法来执行此操作，但您可以创建一个自定义 axis 函数来控制值的放置位置 . 这是一个例子

    myaxis <- function(side, labels="default", ticks="default", ...) {
  default <- lattice.getOption("default.args")$axis
  if(side %in% c("right","bottom")) {
    default(side=side, labels="yes", ticks="yes", ...)
  } else {
    default(side=side, labels="no", ticks="yes", ...)
  }
}

    然后就这样使用它

    xyplot(y ~ x, data = DF, axis=myaxis)

    要得到

    enter image description here

    回复于

相关问题