重命名r kable中的值

library(knitr)

# 创建一个数据框
data <- data.frame(Name = c("John", "Alice", "Bob"),
                   Age = c(25, 30, 35),
                   Gender = c("Male", "Female", "Male"))

# 将数据框转换为HTML表格
table <- kable(data)

# 修改列名
colnames(table)[1] <- "姓名"
colnames(table)[2] <- "年龄"
colnames(table)[3] <- "性别"

# 打印修改后的表格
print(table)