« ハニング窓 | トップページ | sonagram »

Rでハニング窓

これをRを使ってやると、こうなる。

> HanningWindow <- function(x)
+ (x*(0.5-0.5*cos(2*pi*(0:(length(x)-1))/(length(x)-1))))
> x <- c(1,1,1,1,-1,-1,-1,-1)
> HanningWindow(x)
[1] 0.0000000 0.1882551 0.6112605 0.9504844 -0.9504844 -0.6112605 -0.1882551
[8] 0.0000000
>

じつはRで初めて関数を定義したのであった。ちゃんと答あってるでしょ。

|

« ハニング窓 | トップページ | sonagram »

コメント

コメントを書く



(ウェブ上には掲載しません)


コメントは記事投稿者が公開するまで表示されません。



トラックバック

この記事のトラックバックURL:
http://app.cocolog-nifty.com/t/trackback/44043/11180514

この記事へのトラックバック一覧です: Rでハニング窓:

« ハニング窓 | トップページ | sonagram »