> str(tbl_sum(1:3))
 Named chr "int [3]"
 - attr(*, "names")= chr "Description"

> str(tbl_sum(tibble(a = 1:3, b = letters[2:4])))
 Named chr "3 x 2"
 - attr(*, "names")= chr "A tibble"

> dim_desc(iris)
[1] "150 x 5"

> dim_desc(Titanic)
[1] "4 x 2 x 2 x 2"

> dim_desc(1:3)
[1] "3"

> size_sum(iris)
[1] " [150 x 5]"

> size_sum(Titanic)
[1] ""

> size_sum(1:3)
[1] " [3]"

