inst/hbcdtlfb/www/R/outputs/unit_P1.R
In ucsd-dsm/hbcd-tlfb: HBCD TLFB shiny app
output$unit_P1 <- renderText({
req(input$substance_P1)
glue("{strong(substances |> filter(name_short_html == input$substance_P1) |> pull(tlfb_unit))}")
})
ucsd-dsm/hbcd-tlfb documentation built on July 10, 2022, 5:46 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
output$unit_P1 <- renderText({
req(input$substance_P1)
glue("{strong(substances |> filter(name_short_html == input$substance_P1) |> pull(tlfb_unit))}")
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.