myList <- list(a=1:3, b=letters[1:4], a=5:6, b=letters[4:10])
squishList(myList)
myList <- list(a=1:3, b=data.frame(x=1:3, y=4:6), b=data.frame(x=10:14, y=1:5))
squishList(myList)
myList <- list(a=list(c=1:2, d=2), b=letters[1:3], a=list(c=4:5, d=6:9))
squishList(myList)
Run the code above in your browser using DataLab