添加正好 100 张幻灯片后，官员包中出现警告消息

Question

添加超过 100 张幻灯片后，我在官员包中收到警告消息。

library(officer)
pres = read_pptx(path = NULL)
for (i in 1:100)
{
    print(i)
    pres <- add_slide( x = pres , layout = "Title Only", master = "Office Theme" )
}

警告消息是：

Warning message:
In x$slide$add_slide(xml_file, x$slideLayouts$get_xfrm_data()) :
  NAs introduced by coercion

如果我将幻灯片数量限制为 99，即

library(officer)
pres = read_pptx(path = NULL)
for (i in 1:99)
{
    print(i)
    pres <- add_slide( x = pres , layout = "Title Only", master = "Office Theme" )
}

不会显示警告，则不会生成警告消息。

官员包中可以添加的幻灯片数量是否有限制？如果是这样，有没有办法解决这个问题，因为我需要生成 100 多张幻灯片来一起存储数据。

在文档中找不到这个。以上是在 Windows 11 R4.1.1 上使用 officer_0.4.1 进行测试的。