如何在R中创建表？

Question

我想为我在for循环中重复运行的sqlite命令的输出创建一个表。

是我的代码和预期输出的图片。

我在Python中编码时使用PrettyTable。 R中有类似的选择吗？

Answer 1

为什么不为for循环的每次迭代预分配数据帧并[覆盖]值？

循环之前：

output <- data.frame('region' = regions)
output$good_traffic <- 0
output$bad_traffic <- 0

在循环内：

output[output$region == region, 'good_traffic'] <- good_percent
output[output$region == region, 'bad_traffic'] <- bad_percent

循环后：

print(output)

Answer 2

如果我明白您的意思，则应该尝试使用knitr软件包中的kable（）

library(knitr)
t <- table(mtcars$cyl,
       mtcars$am)
kable(t)

summary(lm(hp ~ cyl, data = mtcars))
coef.lmfit <- coef(summary(lm(hp ~ cyl, data = mtcars)))
kable(coef.lmfit)