r - カーネル密度推定の一定帯域幅 (R)

Question

私は今Rでいくつかの問題を抱えています。

私が持っているもの：

• 各三角カーネルの最小値を持つベクトル
• 最大値を持つベクトル
• 「中間」点を持つベクトル (各三角形のピックがあるべき場所)

必要なもの:

• 密度推定 (三角形のカーネル ofc)

Answer 1

三角形のカーネルを使用して、帯域幅仕様をベース密度関数に変更するこの例に基づいて構築できるかどうかを確認してください。

data("faithful", package = "datasets") 
x <- faithful$waiting 
opar <- par(mfcol= c(2,2))
for (bw in c(3,6,12,18) ) {
  hist(x, xlab = "Waiting interval", ylab = "Eruption Freq", 
  probability = TRUE, main = "Density plot: Triangular kernel", 
  border = "gray", sub= bquote("Bandwidth = "*.(bw) ) ) 
  lines(density(x, width = bw, window = "triangular"), lty=3, col="red")
  }
par(opar)