Мне нужно знать, как получить доступ к значению кнопки отмены в диалоговом окне в блестящем мобильном телефоне.
Вот пример приложения
library(shinyMobile)
ui <- f7Page(
title = "myApp",
f7SingleLayout(
navbar = '',
f7Card(
title = 'card1',
f7Button(inputId = "go", label = "go")
)
)
)
server <- function(input, output, session){
observeEvent(input$go, {
f7Dialog(
title = "write",
inputId = "someText",
type = "prompt",
text = "write something",
session = session
)
})
observeEvent(input$someText, {
f7Dialog(
title = "you write",
text = paste("you write this text: ", input$someText, sep = ""),
session = session
)
})
}
shinyApp(ui, server)
Как вы можете видеть , когда я нажимаю кнопку «ОК» в диалоговом окне, я могу вызвать другое событие. Тем не менее, я хочу полностью обновить приложение sh при нажатии кнопки «Отмена» в первом диалоговом окне, но я не знаю, как получить доступ к значению на входе.
Заранее спасибо!