如何不使用renderTable函数，用R和Shiny生成自定义HTML表格？

需求说明 #

• 作为R/Shiny新手，需制作带行列合并的发票样式表格，renderTable无法实现这类复杂结构，因此选择手动构建HTML表格。
• 目标表格样式：

问题描述 #

添加循环生成表格行的代码后出现渲染异常：
注释掉第1578行（用于添加生成的新行的代码）时，表头可正常显示。

现有实现代码 #

相关实现代码如下：

内容的提问来源于stack exchange，提问作者armel sauvy