I have the following list of vectors:
list(c(663L, 705L, 680L, 769L, 775L, 327L, 665L, 805L, 808L, 689L, 774L, 831L, 832L, 217L, 739L, 918L, 354L, 373L, 764L