Downsampled GWAS summary statistics from Kunkle et al. 2019 Alzheimer's Disease GWAS.
get_Kunkle2019()
Kunkle et al. 2019, The Lancet Neurology
# meta <- MungeSumstats::find_sumstats(ids = "ieu_b_2")
# Kunkle2019 <- MungeSumstats::import_sumstats(ids = meta$id[1])
path <- file.path("/Volumes/bms20/projects/neurogenomics-lab/live",
"GWAS_sumstats/OpenGWAS/ieu-b-2.tsv.gz")
Kunkle2019 <- data.table::fread(path)
Kunkle2019 <- subset(Kunkle2019, P<5e-8)Kunkle2019 <- extract_loci(topSNPs = echodata::topSNPs_Kunkle2019,
fullSS = Kunkle2019)#### piggyback ####
tmp <- file.path(tempdir(),"Kunkle2019.tsv.gz")
data.table::fwrite(Kunkle2019,tmp,sep="\t")
piggyback::pb_upload(file = tmp,
repo = "RajLabMSSM/echodata")