Add a "growVertical" spinners based on "dot" (Braille) symbols

[HenrikBengtsson]

I'd like to propose adding the following to cli:::spinners:

growVeriticalDotsLR <- c("⠀", "⡀", "⣀", "⣄", "⣤", "⣦", "⣶", "⣷", "⣿", "⣾", "⣶", "⣴", "⣤", "⣠", "⣀", "⢀")
growVeriticalDotsRL <- c("⠀", "⢀", "⣀", "⣠", "⣤", "⣴", "⣶", "⣾", "⣿", "⣷", "⣶", "⣦", "⣤", "⣄", "⣀", "⡀")
growVeriticalDotsLL <- c("⠀", "⡀", "⣀", "⣄", "⣤", "⣦", "⣶", "⣷", "⣿", "⣷", "⣶", "⣦", "⣤", "⣄", "⣀", "⡀")
growVeriticalDotsRR <- c("⠀", "⡀", "⣀", "⣠", "⣤", "⣴", "⣶", "⣾", "⣿", "⣾", "⣶", "⣴", "⣤", "⣠", "⣀", "⢀")

For example:

for (symbol in growVeriticalDotsRL) { cat(sprintf("%s\r", symbol)); Sys.sleep(0.5) }

PS. I'm not sure about the empty value, since the others spinners don't have them, but if I one want to be able to represent the full range from "empty" to "full", I figured one needs to include them, especially if they should be the same width.

[HenrikBengtsson]

Thanks

[gaborcsardi]

Thank you!