Nothing
context("Test tw_get_message_media()")
test_that("tw_get_message_media() can retrieve a photo", {
skip_on_cran()
media <- tw_get_message_media(Sys.getenv("MEDIA_MESSAGE_SID"))
expect_true(length(media) > 0)
expect_equal(media[[1]]$content_type, "image/jpeg")
})
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.