# NOT RUN {
soundgen:::getPrior(priorMean = 150, # Hz
priorSD = 2) # semitones
soundgen:::getPrior(150, 6)
s = soundgen:::getPrior(450, 24, pitchCeiling = 6000)
plot(s, type = 'l')
# }
Run the code above in your browser using DataLab