Nothing
test_that("Testing get_questionnaire_typeforms", {
skip_on_cran()
if (nchar(Sys.getenv("typeform_api2")) == 0) return(invisible(TRUE))
form_id = get_forms()$form_id[1]
form = get_responses(form_id = form_id)
expect_s3_class(form$meta, "tbl_df")
cols = c(
"landing_id",
"token",
"landed_at",
"submitted_at",
"user_agent",
"platform",
"referer",
"network_id",
"browser",
"score"
)
expect_true(all(cols %in% colnames(form$meta)))
# XXX expect_equal(ncol(form$meta), 11)
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.