The table shows the pull requests that have been created, closed, or merged during the reporting period.
```r if(is.null(gh)){
gh_out <- md2html("Data unavailable as no GitHub repository is provided/available.")
} else {
gh_out <- gh_pr_df %>% select( number, title, state, user, created_at, closed_at, merged_at ) %>% filter(between( created_at, as.Date(from_date, "%Y-%m-%d"), as.Date(to_date, "%Y-%m-%d") ) | between( closed_at, as.Date(from_date, "%Y-%m-%d"), as.Date(to_date, "%Y-%m-%d") ) | between( merged_at, as.Date(from_date, "%Y-%m-%d"), as.Date(to_date, "%Y-%m-%d") ) )
gh_out <- DT::datatable(gh_out, extensions = c('Buttons', 'FixedColumns'), options = list(dom = 'Blfrtip', fixedColumns = list(leftColumns = 2), scrollX = TRUE, buttons = c('copy', 'csv', 'excel', 'pdf', 'print'), lengthMenu = list(c(-1, 10,25,50), c("All", 10,25,50))))
}
gh_out
```
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.