Nothing
cran_df %>% summarise(count = sum(count, na.rm = TRUE)) %>% pull(count) %>% flexdashboard::valueBox( caption = "Total CRAN downloads over period", color = "primary" )
cran_df %>% summarise(count = mean(count, na.rm = TRUE)) %>% pull(count) %>% round(digits = 1) %>% flexdashboard::valueBox( caption = "Daily CRAN downloads", color = "success" )
fnc_str %>% length() %>% flexdashboard::valueBox( caption = "Total number of functions", color = "info" )
pkg_deps %>% length() %>% flexdashboard::valueBox( caption = "Package dependencies", color = "warning" )
gh_opr %>% flexdashboard::valueBox( caption = "Open pull requests", color = "danger" )
gh_ois %>% flexdashboard::valueBox( caption = "Open issues", color = "#224e87" )
# Package description desc <- utils::packageDescription(pkg = pkgname) dplyr::tibble( Field = names(desc), Values = unlist(desc) ) %>% DT::datatable( extensions = c('Buttons', 'FixedColumns'), options = list(dom = 'lfrtip', fixedColumns = list(leftColumns = 2), scrollX = TRUE, lengthMenu = list(c(-1, 10,25,50), c("All", 10,25,50))))
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.