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

> str(tbl_sum(vctrs::new_data_frame(a = 1:3, class = "tbl")))
 Named chr "0 x 0"
 - attr(*, "names")= chr "A data frame"

> 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(trees)
[1] " [31 x 3]"

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

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

