r - ラティスを使用して、更新された線の色をRのプロットの凡例に組み込む方法は？

Question

コンテキストと質問：

2つのグループの密度を示すRの格子プロットに凡例を追加したいと思います。デフォルトの色を黒とグレーに変更しました。ただし、凡例は色を更新していません。

• 凡例で更新された色を使用するために格子プロットを取得するにはどうすればよいですか？
• 凡例の位置を制御するにはどうすればよいですか（プロット領域内に配置できるようにしたい）？

実例：

set.seed(4444)
x1 <- rep("Group A", 50)
x2 <- rep("Group B", 50)
y1 <- rnorm(50, 0, 2)
y2 <- rnorm(50, 1, 2)
dtf <- data.frame(x=c(x1, x2), y =c(y1, y2))

print(densityplot(~y, groups=x, data=dtf,
    pch=".",
    cex=2,
    col=c("black", "gray"),
    auto.key=TRUE,
    xlab="Y"))

Answer 1

凡例の色は、ラティスのよく知られた煩わしさです。Deepayan さんは simpleTheme を解決策として推奨しているため、修正するのは難しいようです。ポジショニングについては、Josh's answer を参照してください。

print(densityplot(~y, groups=x, data=dtf,
              pch=".",
              cex=2,
              par.settings=simpleTheme(col=c("gray","black")),
              auto.key=TRUE,
              xlab="Y"))

Answer 2

もっと洗練された解決策があるかもしれませんが、これで十分です。corner=引数を使用して、プロット内の任意の場所に凡例を配置できることに注意してください。

densityplot(~y, groups = x, data = dtf,
    pch = ".",
    cex = 2,
    col = c("black", "gray"),
    par.settings = list(superpose.line = list(col=c("black", "grey"))),
    auto.key = list(corner = c(0.95, 0.95)),
    xlab = "Y")