畳みこみ

• 今日は畳みこみ
  • ヒストグラムは離散的にパルス関数で畳み込んだようなもの
  • カーネル密度推定は適当な関数で畳み込んだようなもの
• いくつかのサイトを
  • やはり一番、東北工業大学中川先生の「人生畳みこみ」
  • 畳みこみを２次元座標で
  • 物理のかぎしっぽ：相関関数と畳み込み積分のフーリエ変換
  • コンサートホールの音響効果と畳みこみ
  • 神経ネットワークで畳み込み
  • 神経ネットワークで畳み込み、その２
  • 昔、自分で作ったメモ。少し変だが…(平滑化とかとの関係も)
  • フィボナッチも畳み込み

tau <- seq(from=-10,to=10,length=100)
f.tau <- 0.3*dnorm(tau,0,1)+0.7*dnorm(tau,5,2)
par(mfcol=c(2,2))
plot(tau,f.tau,type="l")
bin.w <- 0.9
my.g <- function(t,bin.w){
	ret <- rep(0,length(t))
	ret[which(t>=0 & t<bin.w)] <- 1
	ret
}
g.tau <- my.g(tau,bin.w)
plot(tau,g.tau,type="l")

f.g.tau <- outer(f.tau,g.tau)
matplot(f.g.tau,type="l")
image(f.g.tau)
par(mfcol=c(1,1))