小编QY *_*Luo的帖子

我有一个包含多个变量的表,其中包含长变量名和长字符串作为多个观察值.如何显式设置每个列宽,因此通过R Markdown呈现为HTML的表不会自动将行加倍以使长字符串适合单元格？

即使表格无法同时显示所有列,我也可以使用足够长的列.但是,我总是可以使用'FixedColumns'扩展名和滚动条向右移动以获得更多列.

我目前用于设置列宽的代码是:

options = list(
    autowidth = TRUE,
    columnDefs = list(list(width = '600px', targets = c(1, 2))),

但无论我如何设置不同的宽度,最终渲染的表格看起来都有太大的不同.

以下是我在rmarkdown中使用的一些可重复生成的代码,包括在HTML中生成模拟数据和DT对象.

```{r}
# generate data
vec_1 <- c("DHDH, DDDDDTV", 
       "DHDH, DDDDDTV, TT&T",
       "DHDH, DDDDDTV, TT&T, Caaater",
       "DHDH, DDDDDTV, TT&T, Caaater, Cxx",
       "DHDH, DDDDDTV, TT&T, Cxx",
       "DHDH, DDDDDTV, Caaater",           
       "DHDH, DDDDDTV, Caaater, Cxx",
       "DHDH, DDDDDTV, Cxx")

vec_2 <- c("Some radomn long string aaa bbb ccc dddd aaa bbb ccccccc", 
       "Some radomn long stringa",
       "Some string aaa bbb",
       "Some radomn long string …

这是我在R中做的直方图,请看这里:

这是我用来获取它的代码:

par(mfrow = c(3, 1))
hist(outcome[, 11], main = "Heart Attack", xlim = c(10,20), xlab = "30-day Death Rate")
hist(outcome[, 17], main = "Heart failure", xlim = c(10, 20), xlab = "30-day Death Rate")
hist(outcome[, 23], main = "Pneumonia", xlim = c(10,20), xlab = "30-day Death Rate")

那么,如何修改我的代码以获得以下图表,请看这里:

我需要显示直方图上的全部数据,同时x轴有限,从10到20,中间只有15