This is what I get now. I would like a nicer error that explains that I need seewave for stereo.
sequence(list(piano$A2), list(beat.dynamics[1:100]), stereo = T)
Loading required package: seewave
|======================================================================================================================================================| 100%
Warning message:
In library(package, lib.loc = lib.loc, character.only = TRUE, logical.return = TRUE, :
there is no package called ‘seewave’
Calls: sequence ... tryCatchList -> tryCatchOne -> doTryCatch -> library