# NOT RUN {
play = c(TRUE, FALSE)[2]
# a drum-like sound
s = beat(nSyl = 1, sylLen = 200,
pitchAnchors = c(200, 100), play = play)
plot(s, type = 'l')
# a dry, muted drum
s = beat(nSyl = 1, sylLen = 200,
pitchAnchors = c(200, 10), play = play)
# sci-fi laser guns
s = beat(nSyl = 3, sylLen = 300,
pitchAnchors = c(1000, 50), play = play)
# machine guns
s = beat(nSyl = 10, sylLen = 10, pauseLen = 50,
pitchAnchors = c(2300, 300), play = play)
# }
Run the code above in your browser using DataLab