2

美しいプロットを見たので、再現したいと思います。これまでに得たものを示す例を次に示します。

# kernel density scatterplot
library(RColorBrewer)
library(MASS)
greyscale <- rev(brewer.pal(4, "Greys"))
x <- rnorm(20000, mean=5, sd=4.5); x <- x[x>0]
y <- x + rnorm(length(x), mean=.2, sd=.4)
z <- kde2d(x, y, n=100)
plot(x, y, pch=".", col="hotpink")
contour(z, drawlabels=FALSE, nlevels=4, col=greyscale, add=T)
abline(c(0,1), lty=1, lwd=2)
abline(lm(y~x), lty=2, lwd=2)

輪郭を色で塗りつぶすのに苦労しています。これは仕事ですか、smoothScatterそれとも別のパッケージですか? それは私の使用にかかっているのではないかと思いますkde2d。もしそうなら、誰かがこの機能を説明するか、良いチュートリアルにリンクしてもらえますか?

どうもありがとう!

PS 最終的な画像はグレースケールにする必要があります

4

1 に答える 1