dcolumn bug

vincentarelbundock · Nov 2, 2024 · 295316d · 295316d
1 parent d3be54f
commit 295316d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/style_tabularray.R b/R/style_tabularray.R
@@ -93,7 +93,7 @@ style_apply_tabularray <- function(x) {
         if (!identical(halign, "d")) {
             set[idx] <- sprintf("%s, halign=%s,", set[idx], halign)
         } else {
-            dcol <- get_dcolumn(rec[row]$j[1], x)
+            dcol <- get_dcolumn(rec[row, "j"], x)
             set[idx] <- sprintf("%s, %s", set[idx], dcol)
         }
     }