conflict with patchwork about formattable HOT 2 CLOSED

library(formattable)
formattable(mtcars, 
            list(area(col = c(hp, cyl)) ~ normalize_bar("pink", 0.2)
                 )
            )
# works fine

library(ggplot2)
library(patchwork)
formattable(mtcars, 
            list(area(col = c(hp, cyl)) ~ normalize_bar("pink", 0.2)
            )
)
# Error in area(col = c(hp, cyl)) : unused argument (col = c(hp, cyl))

detach("package:patchwork", unload=TRUE)
formattable(mtcars, 
            list(area(col = c(hp, cyl)) ~ normalize_bar("pink", 0.2)
            )
)
# works fine

library(ggplot2)
library(patchwork)
library(formattable)
formattable(mtcars, 
            list(formattable::area(col = c(hp, cyl)) ~ normalize_bar("pink", 0.2)
            )
)
# works fine