table facade to easily switch implementations

table_facade(df, caption, digits = getOption("digits"), kable = TRUE)