无法在RStudio服务器中安装dplyr的tbl_df屏幕

我使用的是RStudio服务器（版本0.98.994）和dplyr（请参阅下面的会话信息）。但打印tbl_df对象无法适应屏幕。每行的末尾总是有更多的字符（请参见屏幕上的红线）

我已经检查过浏览器：print-tbl_-df object在Firefox上工作，没有缩放，但在Chrome和Internet Explorer上不工作。检查之前，浏览器历史记录是干净的

谢谢你的建议来解决它

> sessionInfo()
R version 3.1.1 (2014-07-10)
Platform: x86_64-unknown-linux-gnu (64-bit)

locale:
 [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C         LC_TIME=C            LC_COLLATE=C         LC_MONETARY=C        LC_MESSAGES=C       
 [7] LC_PAPER=C           LC_NAME=C            LC_ADDRESS=C         LC_TELEPHONE=C       LC_MEASUREMENT=C     LC_IDENTIFICATION=C 

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] hflights_0.1     dplyr_0.4.1.9000

loaded via a namespace (and not attached):
[1] DBI_0.3.1      Rcpp_0.11.3    assertthat_0.1 magrittr_1.5   parallel_3.1.1 tools_3.1.1   

---

这看起来可能只是

tbl_df

print方法的结果，该方法在空间非常紧张时会进一步截断第一列

以下是

dplyr:：：trunc\u mat

中的片段，它用于

dplyr:：：print.tbl\u df

... 
rownames(df) <- NULL
is_list <- vapply(df, is.list, logical(1))
df[is_list] <- lapply(df[is_list], function(x) vapply(x, 
    obj_type, character(1)))
mat <- format(df, justify = "left")
width <- width %||% getOption("dplyr.width", NULL) %||% getOption("width")
values <- c(format(rownames(mat))[[1]], unlist(mat[1, ]))
names <- c("", colnames(mat))
w <- pmax(nchar(values), nchar(names))
cumw <- cumsum(w + 1)
too_wide <- cumw[-1] > width
if (all(too_wide)) {
    too_wide[1] <- FALSE
    df[[1]] <- substr(df[[1]], 1, width)
}
...

---

谢谢你的建议。我尝试在print.tbl_df中调整宽度参数，但仍然遇到相同的问题。chrome和firefox似乎返回不同的getOptions（“宽度”）值，即firefox为193，chrome为221（两者都是全宽）。您可以尝试截断列名

dplyr

使用了一个取决于列宽的宽度选项。谢谢您的建议。现在我知道了如何通过调整print.tbl_df的参数来打印它。但是RStudio服务器似乎有一个bug。我将向github报告并在这里粘贴一个链接。也尝试较短的列名，看看这是否有帮助这是RStudio中的一个已知错误

> grep("dplyr", names(options()), value=TRUE)
[1] "dplyr.print_max"  "dplyr.print_min"  "dplyr.strict_sql"