Create a Pedal
object to represent piano sustain pedal marks.
Pedal(i, j, to = NULL)
A single positive integer. They indicate the start
and end position of the Pedal
object in a musical line.
Optional. A single character or a single positive integer,
which indicates the musical line where to add the Pedal
object.
A list of class Pedal
.
+.Music()
for adding a Pedal
to a Music
object.
# Create a `Pedal`
pedal <- Pedal(1, 3)
pedal
#> Pedal
#>
#> * from position 1 to 3
# Add it to a `Music`
music <- Music() + Meter(4, 4) + Line(c("C4", "D4", "E4")) + pedal
music
#> Music
#>
#> $meters
#> # A tibble: 1 × 6
#> bar number unit actual_number actual_unit invisible
#> <int> <int> <int> <int> <int> <lgl>
#> 1 1 4 4 4 4 FALSE
#>
#> $notes
#> # A tibble: 3 × 7
#> line i j pitch midi duration length
#> <int> <int> <int> <chr> <int> <chr> <dbl>
#> 1 1 1 NA C4 60 NA 1
#> 2 1 2 NA D4 62 NA 1
#> 3 1 3 NA E4 64 NA 1
#>
#> $lines
#> # A tibble: 1 × 7
#> part staff voice segment bar offset name
#> <int> <int> <int> <int> <int> <dbl> <chr>
#> 1 1 1 1 1 1 0 NA
#>
#> $pedals
#> # A tibble: 1 × 3
#> line i j
#> <int> <int> <int>
#> 1 1 1 3
#>
# Generate the music score
if (interactive()) {
show(music)
}