Individual-level metadata for 1000 Genomes Project (Phase 1).

data("popDat_1KGphase1")

Format

data.table

Source

popDat_URL <- "ftp://ftp-trace.ncbi.nih.gov/1000genomes/ftp/release/20110521/phase1_integrated_calls.20101123.ALL.panel" popDat_1KGphase1 <- data.table::fread(text = trimws(gsub(",\t", ",", readLines(popDat_URL))), sep = "\t", fill = T, stringsAsFactors = F, col.names = c("sample", "population", "superpop", "sex"), nThread = 4) usethis::use_data(popDat_1KGphase1, overwrite = T)

See also