Replace bootstrap grid columns

By default shiny uses col-sm-* classes. We want to be able to replace these with a different column type, e.g. col-xl-*. This function recursively iterates through shiny UI elements and replaces the classes of shiny.tag objects.

replace_bootstrap_cols(
  x,
  from = c(".", "xs", "sm", "md", "lg", "xl"),
  to = c("xs", "sm", "md", "lg", "xl")
)

Arguments

x	an object we want to iterate through, initialy should be a shiny.tag.list
from	the column type we want to replace, defaults to "." (all)
to	the column type we want to replace