\dontrun{ mid_file_str <- system.file("extdata", "test_midi_file.mid", package = "pyramidi") mido_mid_file <- mido$MidiFile(mid_file_str) dfc <- miditapyr$frame_midi(mido_mid_file) ticks_per_beat = mido_mid_file$ticks_per_beat df <- dfc %>% miditapyr$unnest_midi() }



urswilke/pyramidi documentation built on March 7, 2024, 3:48 p.m.