list1 <- list(100:130, "R", list(TRUE, FALSE))
list1

card<- list("ace","hearts",1)
card