Create a color-tile formatter
color_tile(...)
...
parameters passed to gradient.
gradient
formattable(mtcars, list(mpg = color_tile("white", "pink")))