View source: R/add_notie_date_dialog.R
add_notie_date_dialog | R Documentation |
Implemente la fonction date de la librairie JS notie
add_notie_date_dialog( inputId = "date", submitText = "Valider", cancelText = "Annuler", position = "top", session )
inputId |
id qui va contenir la reponse de l'appel à la notif (TRUE/FALSE) |
submitText |
texte de la case de validation de la notif |
cancelText |
texte de la case de refus de la notif |
position |
position de la notif : string ('top', 'bottom') |
session |
argument session shiny |
https://github.com/jaredreich/notie
https://codingshiksha.com/javascript/notie-js-javascript-alert-toast-notification-library-full-tutorial-with-examples/
une alerte notie
## Not run: library(shiny) library(shinyYM) ui <- fluidPage( add_notie_deps(), actionButton(inputId = "b1", "confirm"), verbatimTextOutput("date") ) server <- function(input, output, session) { observeEvent(input$b1, { add_notie_date_dialog(inputId = "date", submitText = "Valider", cancelText = "Annuler", position = "top", session) }) output$date <- renderPrint(input$date) } # Run the application shinyApp(ui = ui, server = server) ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.