Missing sets in Venn Diagram using `ggvenn` in `R`

Question

I have a list with 7 sets of data. The following code

genes <- paste("gene",1:1000,sep="")
x <- list(
   A = sample(genes,300), 
   B =