if (FALSE) {
## First get an audio sample from the ProTrackR package
snare.samp <- ProTrackR::PTSample(ProTrackR::mod.intro, 2)
## Coerce it into an IFFChunk object:
snare.iff <- WaveToIFF(snare.samp)
## Play the 8SVX sample:
play(snare.iff)
}
Run the code above in your browser using DataLab