r - 单空间pander表
问题描述
我怎样才能将 pander 打印为单个空间,而不是双倍。目前,如果我这样做:
pander(mtcars[1:5, 1:5])
我得到:
--------------------------------------------------------
mpg cyl disp hp drat
----------------------- ------ ----- ------ ----- ------
**Mazda RX4** 21 6 160 110 3.9
**Mazda RX4 Wag** 21 6 160 110 3.9
**Datsun 710** 22.8 4 108 93 3.85
**Hornet 4 Drive** 21.4 6 258 110 3.08
**Hornet Sportabout** 18.7 8 360 175 3.15
--------------------------------------------------------
我怎样才能得到这个:
--------------------------------------------------------
mpg cyl disp hp drat
----------------------- ------ ----- ------ ----- ------
**Mazda RX4** 21 6 160 110 3.9
**Mazda RX4 Wag** 21 6 160 110 3.9
**Datsun 710** 22.8 4 108 93 3.85
**Hornet 4 Drive** 21.4 6 258 110 3.08
**Hornet Sportabout** 18.7 8 360 175 3.15
--------------------------------------------------------
解决方案
这是一个hacky方式:
single_print <- function(x, ...){
out <- capture.output(pander(x, ...))
cat(out[out != ''], sep = '\n')
}
single_print(mtcars[1:5, 1:5])
## --------------------------------------------------------
## mpg cyl disp hp drat
## ----------------------- ------ ----- ------ ----- ------
## **Mazda RX4** 21 6 160 110 3.9
## **Mazda RX4 Wag** 21 6 160 110 3.9
## **Datsun 710** 22.8 4 108 93 3.85
## **Hornet 4 Drive** 21.4 6 258 110 3.08
## **Hornet Sportabout** 18.7 8 360 175 3.15
## --------------------------------------------------------
我已经要求这是这里的一个功能:https ://github.com/Rapporter/pander/issues/327
推荐阅读
- c++ - 无法通过 C++ 中的套接字发送 ostringstream 变量
- node.js - 删除 CloudWatch 事件规则仍将其附加到 lambda
- ms-access-2010 - 尝试打印快速报告时出现 EOleException 错误
- asp.net-mvc - 如何在控制器操作上使用可选的通用参数?
- r - 尝试在 R 中使用 dplyr 创建函数以获取频率计数时对变量进行分组时出错
- javascript - Js:如何将对象属性名称转换为字符串
- sql-server - java - 如何将jdbc模板查询结果转换为java中的JSON数组?
- python - 使散景图散点的颜色和标记取决于数据框值
- linux - Wayland 上的 libinput-gestures:无法获得“超级”密钥
- python - python请求ConnectTimeout后接收状态码