# NOT RUN {
x <- "r s e_2 a_, c#f#a#"
tally_notes(x)
tally_pitches(x)
octaves(x)
tally_octaves(x)
distinct_notes(x)
distinct_pitches(x)
distinct_octaves(x)
pitch_range(x)
semitone_range(x)
semitone_span(x)
octave_range(x)
octave_span(x)
# }
Run the code above in your browser using DataLab