Changed vcf.R to s4, found bugs