v1 <- c(1, 1, 2, 4, 3, 5, 6, 7, 3, 9)
v2 <- c(1, 2, 3, 4, 2, 3, 4, 5, 3, 1)
v3 <- c(0, 1, 0, 0, 0, 1, 1, 1, 0, 1)