Nothing
Code
# Number of rows is shown
x <- memdb_frame(a = 1:3) %>% filter(a > 0)
setup <- pillar::tbl_format_setup(x)
tbl_format_header(x, setup)[[1]]
Output
[1] "# Source: SQL [3 x 1]"
Code
# Number of rows still can't be shown
x <- memdb_frame(a = 1:11) %>% filter(a > 0)
setup <- pillar::tbl_format_setup(x)
tbl_format_header(x, setup)[[1]]
Output
[1] "# Source: SQL [?? x 1]"
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.