Read VCF File from 1000 Genomes

library(vcfR)

## Warning: package 'vcfR' was built under R version 4.2.2

## 
##    *****       ***   vcfR   ***       *****
##    This is vcfR 1.13.0 
##      browseVignettes('vcfR') # Documentation
##      citation('vcfR') # Citation
##    *****       *****      *****       *****

genomesFile <- vcfR::read.vcfR("my_snps.vcf.gz",
                             convertNA = T)

## Scanning file to determine attributes.
## File attributes:
##   meta lines: 130
##   header_line: 131
##   variant count: 6867
##   column count: 2513
## 
Meta line 130 read in.
## All meta lines processed.
## gt matrix initialized.
## Character matrix gt created.
##   Character matrix gt rows: 6867
##   Character matrix gt cols: 2513
##   skip: 0
##   nrows: 6867
##   row_num: 0
## 
Processed variant 1000
Processed variant 2000
Processed variant 3000
Processed variant 4000
Processed variant 5000
Processed variant 6000
Processed variant: 6867
## All variants processed

head(genomesFile)

## [1] "***** Object of class 'vcfR' *****"
## [1] "***** Meta section *****"
## [1] "##fileformat=VCFv4.1"
## [1] "##FILTER=<ID=PASS,Description=\"All filters passed\">"
## [1] "##fileDate=20150218"
## [1] "##reference=ftp://ftp.1000genomes.ebi.ac.uk//vol1/ftp/technical/refe [Truncated]"
## [1] "##source=1000GenomesPhase3Pipeline"
## [1] "##contig=<ID=1,assembly=b37,length=249250621>"
## [1] "First 6 rows."
## [1] 
## [1] "***** Fixed section *****"
##      CHROM POS        ID            REF ALT QUAL  FILTER
## [1,] "13"  "36515937" "rs142528375" "T" "C" "100" "PASS"
## [2,] "13"  "36515987" "rs76072418"  "C" "T" "100" "PASS"
## [3,] "13"  "36515992" "rs557064228" "T" "C" "100" "PASS"
## [4,] "13"  "36515997" "rs146007645" "T" "C" "100" "PASS"
## [5,] "13"  "36516002" "rs118030522" "G" "T" "100" "PASS"
## [6,] "13"  "36516013" "rs555619020" "T" "C" "100" "PASS"
## [1] 
## [1] "***** Genotype section *****"
##      FORMAT HG00096 HG00097 HG00099 HG00100 HG00101
## [1,] "GT"   "0|0"   "0|0"   "0|0"   "0|0"   "0|0"  
## [2,] "GT"   "0|0"   "0|0"   "0|0"   "0|0"   "0|0"  
## [3,] "GT"   "0|0"   "0|0"   "0|0"   "0|0"   "0|0"  
## [4,] "GT"   "0|0"   "0|0"   "0|0"   "0|0"   "0|0"  
## [5,] "GT"   "0|0"   "0|0"   "0|0"   "0|0"   "0|0"  
## [6,] "GT"   "0|0"   "0|0"   "0|0"   "0|0"   "0|0"  
## [1] "First 6 columns only."
## [1] 
## [1] "Unique GT formats:"
## [1] "GT"
## [1]