# NOT RUN {
## Create the reactable table and then pipe in the source
table <- reactable(iris[10:29, ])
table %>%
add_source("This is a source")
## Use options to adjust the style and position of the source
table %>%
add_source("This is a source", font_style = "italic", font_color = "grey")
# }
Run the code above in your browser using DataLab