r - データテーブルの複数の列に「formatStyle」を適用する方法

Question

パッケージを使用して、データテーブルの複数の列にスタイルを適用しようとしていDTます:

たとえば、列の範囲に基づいて各列のカラー バーを作成したいとします。forループを実行できることはすでにわかっています：

columns <- c("Sepal.Length","Sepal.Width","Petal.Length","Petal.Width")

dt <- DT::datatable(iris)
for( x in columns){
  dt <- dt %>%
    DT::formatStyle(
      x,
      background = DT::styleColorBar(iris[[x]],"steelblue"),
      backgroundSize = '90% 90%',
      backgroundRepeat = 'no-repeat',
      backgroundPosition = 'center'
    )

}
dt

しかし、個人的に私はループの大きな楽しみではありませんformatStyle。ループを使用せずに「マップ」するための組み込みまたはより簡単な方法はありますか? ありがとう！

---

https://rstudio.github.io/DT/010-style.htmlの DT ガイドを既に確認しましたが、最後の例は似ています。ただし、この例では、異なる列が同じ範囲を共有しています。私が望むのは、各列が独自の最小値と最大値を使用してカラーバーを作成することです。