Instantly share code, notes, and snippets.

Embed
What would you like to do?
library(soundgen)
# synthesize a sound 1 s long, with gradually increasing hissing noise
sound = soundgen(sylLen = 1000,
temperature = 0.001,
noiseAnchors = list(
time = c(0, 1300),
value = c(-120, 0)),
formantsNoise = list(
f1 = list(
freq = 5000,
width = 10000)))
# basic spectrogram
spectrogram(sound, samplingRate = 16000)
# there is a function with the same name in phonTools so you might want to
# be more verbose and call it using soundgenn:spectrogram() to avoid clashes
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment