# Basic configuration
config <- drag_canvas()
# Custom configuration
config <- drag_canvas(
enable = TRUE,
direction = "x",
range = c(-100, 100),
sensitivity = 5,
trigger = list(
up = "ArrowUp",
down = "ArrowDown",
left = "ArrowLeft",
right = "ArrowRight"
)
)
Run the code above in your browser using DataLab