From 18de3363aa3a5d243dd9f63c52ddf6696473caa4 Mon Sep 17 00:00:00 2001
From: atusy <30277794+atusy@users.noreply.github.com>
Date: Sun, 31 Mar 2024 21:23:34 +0900
Subject: [PATCH] fix(colformat_md): improve robustness by using seq_len
 instead of seq

---
 R/colformat.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/colformat.R b/R/colformat.R
index 63dbd4e..0ca5d0c 100644
--- a/R/colformat.R
+++ b/R/colformat.R
@@ -63,7 +63,7 @@ colformat_md <- function(x,
 
   # Must evaluate outside add_footnotes due to lazy evaluation of arguments
   ft <- flextable::compose(x,
-    i = seq(nrow(dataset)), j = col, part = part,
+    i = seq_len(nrow(dataset)), j = col, part = part,
     value = as_paragraph_md(
       texts,
       auto_color_link = auto_color_link,