Loading your VCF file into R

genome_snp <- vcfR::read.vcfR("FinalProject14.27608412-27848412.ALL.chr14_GRCh38.genotypes.20170504.vcf", convertNA = T)

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

summary(genome_snp)

## Length  Class   Mode 
##      1   vcfR     S4

head(genome_snp)

## ***** Object of Class vcfR *****
## 2504 samples
## 1 CHROMs
## 6 variants
## Object size: 0.3 Mb
## 0 percent missing data
## *****        *****         *****