# noteworthy class examples
x <- "a b c"
c(x, x)
c(as_noteworthy(x), x)
# noteinfo class examples
x <- "4- t8( t8)( t8) 4*2"
c(as_noteinfo(x), x)
# music class examples
x <- "c,~4 c,1 c'e_'g'4-.*2"
c(as_music(x), x)
# phrase class examples
c(phrase(x), x)
Run the code above in your browser using DataLab