Components of GWAS summary data
pop <- "EUR"
bfile <- paste0("/Users/gh13047/repo/mr-base-api/app/ld_files/", pop)
varref <- variant_reference(bfile)
regions <- get_regions(pop)
t1 <- Sys.time()
generate_ld_matrices(regions[1:2,], varref, bfile)
Sys.time()-t1
t1 <- Sys.time()
generate_ld_matrices2(regions[1:2,], varref, bfile)
Sys.time()-t1