# create a 3/4 time signature
Meter(3, 4)
# insert a time signature into a specific measure
Music() + Meter(3, 4, bar = 10)
m <- Music() + Line(list("C5"), list(3))
# specify the actual time signature
ts <- Meter(3, 4, actual_number = 1, actual_unit = 4)
ts
if (interactive()) {
show(m + ts)
}
# make a time signature invisible on score
if (interactive()) {
ts <- Meter(3, 4, invisible = TRUE)
show(m + ts)
}
Run the code above in your browser using DataLab