items <- c(1,2,3,2,4,3,2)
unique (items)