# NOT RUN {
if (interactive()) {
library(shiny)
library(shinyMobile)
shinyApp(
ui = f7Page(
title = "My app",
f7SingleLayout(
navbar = f7Navbar(title = "f7TapHold"),
f7Button(inputId = "pressme", label = "Press me")
)
),
server = function(input, output, session) {
observe({
f7TapHold(
target = "#pressme",
callback = "app.dialog.alert('Tap hold fired!');",
session = session
)
})
}
)
}
# }
Run the code above in your browser using DataLab