tuneR (version 1.3.3)

postaud: Equal loudness compression

Description

Do loudness equalization and cube root compression

Usage

postaud(x, fmax, fbtype = c("bark", "mel", "htkmel", "fcmel"), 
    broaden = FALSE)

Arguments

x

Matrix of spectra (output of audspec).

fmax

Maximum frequency im Hertz.

fbtype

Auditory frequency scale.

broaden

Use two additional frequency bands for calculation.

Value

x

Matrix of the per sample/frame (columns) spectra after applying the frequency dependant loudness equalization and compression.

eql

Vector of the equal loudness curve.

References

Daniel P. W. Ellis http://www.ee.columbia.edu/~dpwe/resources/matlab/rastamat/, Hynek Hermansky

See Also

audspec, dolpc

Examples

# NOT RUN {
  testsound <- normalize(sine(400) + sine(1000) + square(250), "16")
  pspectrum <- powspec(testsound@left, [e-mail])
  aspectrum <- audspec(pspectrum, [e-mail])
  paspectrum <- postaud(x = aspectrum$aspectrum, fmax = 5000, 
    fbtype = "mel")
# }