SU:UA-MA34S:M13A:：247:ENG:NOISE:パタパタ異音:FFT:タンタン:LLC:青灯消灯66℃:MIL on:DTC:P0135:

SU:UA-MA34S:M13A:：247:ENG:NOISE:パタパタ異音:FFT:タンタン:LLC:青灯消灯66℃:MIL on:DTC:P0135: ( 自動車 ) - CQF - Yahoo!ブログ

• 2016/12/4(日) 午前 0:08

• 0

SU:UA-MA34S:M13A:：247:ENG:NOISE:パタパタ異音:FFT:タンタン:LLC:青灯消灯66℃: LLC:青灯消灯66℃:

 コメント（7）

   

library(tuneR)

mywave <-readWave("H:\\WAV\\MA63A-M13A-247-01.wav")

play(mywave)

plot(abs(spec),type='o',xlim=c(0,10000))

# abs(spec)
object.size(spec)

2016/12/4(日) 午前 0:21[ ogw*og*3 ]返信する

   

> da = 3160888/44100
> da
[1] 71.67546
> Hlz =2500/da : 35Hz

5500:77Hz

3500

1250:17Hz

1000:14Hz

2016/12/4(日) 午前 0:25[ ogw*og*3 ]返信する

   

錯覚で
成り立つ政治
経済か

幻想か

夢幻の
泡銭
果てしない

皆夢の
覚めても惑う
闇の中



単純は
原点なりや

2016/12/4(日) 午前 1:50[ ogw*og*3 ]返信する

   

library(tuneR)
mywave <-readWave("H:\\WAV\\MA63A-M13A-247-01.wav")
plot(mywave@right ,type='o' ,col='cyan')

MA63A_wave_cut <- head(mywave , n=1024)
plot(MA63A_wave_cut@right ,type='o' ,col='cyan')

play(MA63A_wave_cut)
spec <- fft(MA63A_wave_cut)

# plot(abs(spec),type='o',xlim=c(0,60))

2016/12/4(日) 午前 6:00[ ogw*og*3 ]返信する

   

library(tuneR)
mywave <-readWave("H:\\WAV\\MA63A-M13A-247-01.wav")
plot(mywave@right ,type='o' ,col='cyan')

MA63A_wave_cut <- head(mywave , n=1024)

plot(MA63A_wave_cut@right ,type='o' ,col='cyan')

play(MA63A_wave_cut)
spec <- fft(MA63A_wave_cut)

# plot(abs(spec),type='o',xlim=c(0,60))

MA63A_wave_cut <- head(mywave , n=32768)

MA63A_wave_cut <- head(mywave , n=8192)

spec <- fft(MA63A_wave_cut@left)

plot(abs(spec),type='o',col='cyan',xlim=c(0,500))

2016/12/4(日) 午前 6:49[ ogw*og*3 ]返信する

   

SoundEngine ver.5.21

http://soundengine.jp/wordpress/soundengine_help/index/view/save_view/

2016/12/4(日) 午前 8:05[ ogw*og*3 ]返信する

   

パタパタNoise,1.2Hz pattern

10sec,12個のパターンが観察される。

パタパタと表現しましたがタンタン音？

FFTでは細かい振幅の強度を強く拾い、低周波の傾向が埋没する
このため前処理しないと数値化では判断し難い。

このような場合は元データのプロットからどのような処理が適切かも判断する必要がある。

2016/12/5(月) 午前 8:11[ ogw*og*3 ]返信する

トラックバック先の記事

• 自動車 | SU:UA-MA34S:M13A:RELAY:耐久性：247:45569km：ND:156700-2 ...