# NOT RUN {
pitchManual = c(130, 150, 250, 290, 320, 300, 280, 270, 220)
soundgen:::upsamplePitchContour(pitchManual, len = 5, plot = TRUE)
soundgen:::upsamplePitchContour(pitchManual, len = 25, plot = TRUE)
pitchManual = c(NA, 150, 250, NA, NA, 300, 280, 270, NA)
soundgen:::upsamplePitchContour(pitchManual, len = 5, plot = TRUE)
soundgen:::upsamplePitchContour(pitchManual, len = 25, plot = TRUE)
soundgen:::upsamplePitchContour(c(NA, NA), len = 5)
# }
Run the code above in your browser using DataLab