#
# testServer(displayDataModuleServer, args = list(DF = reactive(cars)), {
# expect(is.data.frame(DF()), "DF is not a data frame")
# output$table
# })
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.