与 v1.3.0 一样使用分栏符打印 tibble

Print tibble with column breaks as in v1.3.0

使用最新版本 tibble 设置 width = Inf 时,宽小标题的输出无法正确显示。

根据我对以前版本的测试,在 1.3.0 之后的版本之前,宽小标题打印得很好。这就是我希望打印的输出:

...但这是使用最新版本的 tibble 的样子:

我修改了旧资源但无济于事。我想将它合并到一个包中,以便解决方案应该通过 R CMD 检查。当我刚从 tibble v1.3.0 复制了一大堆函数时,我设法恢复了旧的行为但无法通过检查。

有一个与此问题相关的未解决 issue on Github,但显然是 'not high priority'。有没有办法用新版本正确打印小标题?

试试这个功能:

print_width_inf <- function(df, n = 6) {
  df %>%
    head(n = n) %>%
    as.data.frame() %>%
    tibble:::shrink_mat(width = Inf, rows = NA, n = n, star = FALSE) %>%
    `[[`("table") %>%
    print()
}

这似乎有变化,现在可以使用:

options(tibble.width = Inf)