o-studies

OHDSI studies

Code below may become outdated.

#--chapter
# install.packages('tidyverse')
# install.packages('dplyr')
# install.packages('magrittr')
# install.packages('tidyr')

library(DT)

#when executed
Sys.Date()

## [1] "2021-04-23"

url='https://github.com/OHDSI/ShinyDeploy/raw/master/OhdsiStudies/githubScraper.R'

library(httr)
library(tidyverse)

## -- Attaching packages --------------------------------------- tidyverse 1.3.0 --

## v ggplot2 3.3.3     v purrr   0.3.4
## v tibble  3.1.0     v dplyr   1.0.5
## v tidyr   1.1.3     v stringr 1.4.0
## v readr   1.4.0     v forcats 0.5.1

## -- Conflicts ------------------------------------------ tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()

library(magrittr)

## 
## Attaching package: 'magrittr'

## The following object is masked from 'package:purrr':
## 
##     set_names

## The following object is masked from 'package:tidyr':
## 
##     extract

source(url)

#uncoment for full run
#repoTable <- scrapeGithub()
 #saveRDS(repoTable, "c:/temp/repoTable.rds")
 repoTable <- readRDS("c:/temp/repoTable.rds")

Overview

You can also embed plots, for example:

repoTable %>% datatable()

Analysis

You can also embed plots, for example:

repoTable %>% count(status) %>% datatable()

repoTable %>% count(publications) %>% datatable()

repoTable %>% count(leadTag) %>% datatable()