Question

我想在我的XY情节中制作第二个传奇。我已经制作了一个包含三个不同组的XYplot。我已经制作了一个传奇，但我想制作第二个传奇，其中想要显示多重R平方值和P值。我尝试了几件事，但它不起作用。下面你可以看到我放入R的内容。

palette(rainbow(3))

library(lattice)

xyplot(ampli...freq~m.s,groups=pleo.,data=data,type=c("g","p","r"),pch=16,cex=1.1,lwd=2,col=palette(),
xlab="Flowspeed (m/s)",ylab="Amplitude*Frequency",main="Lobster Stephan, amplitude*Frequency against the flowspeed",

key=list(space="right",points=list(pch=16,cex=1.0,col=palette()),
text=list(c("pleopode 2","pleopode 3","pleopode 4")),

legend=list(space="inside",lines=list(lwt=2,col=palette()),
text=list(c("r2= ","R2 = ","R2 =")))))

有人可以告诉我如何做出这个怀疑吗？

谢谢！

Answer 1

legend会覆盖auto.key。您应该使用keey / auto.key创建第一个绘图并更新它。

myplot <- xyplot(...)
fun_legend <- function(txt,x,...) grid::textGrob(txt, x=x,...)
update(my_plot, 
           legend = list(inside =list(fun = "fun_legend",
                                      args=list(txt='some text',x=4,rot=90))))

XY绘图中R的第二个图例

1 个答案: