Use '*_style' funcs with generic 'add_layer(style)' instead of 'add_layer_*' funcs

[crazycapivara]

map %>%
  add_layer(fill_style(...))

# Then we can use it in the same way as 'as_mapbox_source()'
as_layer_style(data_obj)