a <- notate("t8x", "Start here")
notes <- "a, b, c d e f g# a r ac'e' a c' e' c' r*3 ac'e'~ ac'e'"
info <- paste(a, "t8x t8-. 16 4.. 16- 16 2^ 2 4. 8( 4)( 4) 8*4 1 1")
x <- as_music(notes, info)
data.frame(
duration = info_duration(x),
slur_on = info_slur_on(x),
slur_off = info_slur_off(x),
slide = info_slide(x),
bend = info_bend(x),
dotted = info_dotted(x),
dotted1 = info_single_dotted(x),
dotted2 = info_double_dotted(x),
annotation = info_annotation(x),
articulation = info_articulation(x)
)
Run the code above in your browser using DataLab