this is an option, ... but perhaps understanding your motivations/use case would help find a best solution.
library(tidyverse)
foo <- tibble(aColumn =c(0.00001, -2))
library(formattable)
(foo2 <- mutate(foo,
bColumn=formattable(aColumn,formatter = function(x)
digits(x,5))
))
# A tibble: 2 x 2
aColumn bColumn
<dbl> <formttbl>
1 0.00001 0.00001
2 -2 -2.00000
