Load GWAS Catalog
library(readr) gwas_cat <- read_tsv("https://www.genome.gov/admin/gwascatalog.txt")