格式化 table 输出,打印到 R 控制台
Formatted table output, printing into R console
我有处理一些数据的功能,我想在功能(循环)进行时打印中间步骤。我可以在更新数据全部集中在一个 data.frame()
的地方做到这一点。我正在考虑一些简单的 table,例如我在 Rapporter 工具箱中看到的。
所以问题是如何或是否可以将带有数值的 table 打印到控制台中。
谢谢。
编辑:print()
不是我想要的解决方案,原因如下:
function print()
将数值打印到控制台,但它是一堆乱七八糟的数字。我希望有一种 table 可以在函数进行时轻松检查值。所以我可以更好地定位数值。
是这样的吗?
require(knitr)
for(i in 1:2){
#some calculation
x<-runif(runif(1,1,5))
y<-length(x)
#dataframe output
df <- cbind(x,y)
#pretty table
print(kable(df))
}
#output
# | x| y|
# |---------:|--:|
# | 0.4872941| 3|
# | 0.8014921| 3|
# | 0.7023384| 3|
#
#
# | x| y|
# |---------:|--:|
# | 0.9214315| 4|
# | 0.7119830| 4|
# | 0.0354769| 4|
# | 0.1049139| 4|
我有处理一些数据的功能,我想在功能(循环)进行时打印中间步骤。我可以在更新数据全部集中在一个 data.frame()
的地方做到这一点。我正在考虑一些简单的 table,例如我在 Rapporter 工具箱中看到的。
所以问题是如何或是否可以将带有数值的 table 打印到控制台中。
谢谢。
编辑:print()
不是我想要的解决方案,原因如下:
function print()
将数值打印到控制台,但它是一堆乱七八糟的数字。我希望有一种 table 可以在函数进行时轻松检查值。所以我可以更好地定位数值。
是这样的吗?
require(knitr)
for(i in 1:2){
#some calculation
x<-runif(runif(1,1,5))
y<-length(x)
#dataframe output
df <- cbind(x,y)
#pretty table
print(kable(df))
}
#output
# | x| y|
# |---------:|--:|
# | 0.4872941| 3|
# | 0.8014921| 3|
# | 0.7023384| 3|
#
#
# | x| y|
# |---------:|--:|
# | 0.9214315| 4|
# | 0.7119830| 4|
# | 0.0354769| 4|
# | 0.1049139| 4|