使用panel.superpose将文本添加到xyplot

时间:2013-09-16 16:13:38

标签: r lattice

我用xyplot创建了一个图,它必须显示两组点,它们是回归线。

xyplot(log(Vegetati)~log(Reprod), type=c("p", "r"), group=Espece, data=plantes, panel = "panel.superpose", auto.key =list( points = FALSE, columns=2), xlab="log(modules végétatifs)", ylab="log(modules reproducteurs)", )

我现在将添加两个不同回归线的方程式,但我没有成功将panel.superpose函数与panel.text或其他组合。 我的方式错了吗?我不能用等式来表示方程式和两个点的组。

谢谢!所以,这是一个可再现的例子:

library(lattice)
data(iris)
xyplot(log(Sepal.Width)~log(Sepal.Length), type=c("p", "r"), group=Species,
    data=iris, panel = "panel.superpose")
编辑:问题解决了!谢谢!

1 个答案:

答案 0 :(得分:1)

通常您会编写自己的自定义面板函数,该函数委托给您有兴趣调用的面板函数

panel.my <- function(...) {
    panel.superpose(...)
    panel.text(1, 2, "shoe")  ## or ltext
}

然后使用它

xyplot(log(Vegetati)~log(Reprod), type=c("p", "r"), group=Espece, data=plantes, 
    panel = panel.my)

使用...将panel.my看到的所有参数传递给panel.superpose;您可能会截取特定参数以了解您所在的面板等,但更多细节需要您提供一个示例,即StackOverflow 参与者(不仅仅是您!)可以重现,例如,使用其中一个内置数据集。