如何将R中的html表连接在一起？

library(htmltools)

# 创建两个HTML表
table1 <- data.frame(Name = c("John", "Jane", "Mike"),
                     Age = c(25, 30, 35))
table2 <- data.frame(Name = c("Tom", "Emily", "Chris"),
                     Age = c(40, 45, 50))

# 将表格转换为HTML格式
table1_html <- htmlTable(table1)
table2_html <- htmlTable(table2)

# 连接两个HTML表
combined_html <- tagList(table1_html, table2_html)

# 打印连接后的HTML表
print(combined_html)