1

如何设置表示输出的宽度?

假设我有这样的代码:

(x <- 1:100)

我得到这个reprex::reprex(venue = "so")

(x <- 1:100)
#>   [1]   1   2   3   4   5   6   7   8   9  10  11  12  13  14  15  16  17
#>  [18]  18  19  20  21  22  23  24  25  26  27  28  29  30  31  32  33  34
#>  [35]  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50  51
#>  [52]  52  53  54  55  56  57  58  59  60  61  62  63  64  65  66  67  68
#>  [69]  69  70  71  72  73  74  75  76  77  78  79  80  81  82  83  84  85
#>  [86]  86  87  88  89  90  91  92  93  94  95  96  97  98  99 100

如何增加输出的宽度以输出类似这样的内容

 [1]    1   2   3   4   5   6   7   8   9  10  11  12  13  14  15  16  17  18  19  20  21  22  23  24  25  26  27  28  29  30  31  32  33  34  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50
 [51]  51  52  53  54  55  56  57  58  59  60  61  62  63  64  65  66  67  68  69  70  71  72  73  74  75  76  77  78  79  80  81  82  83  84  85  86  87  88  89  90  91  92  93  94  95  96  97  98  99 100

可能的解决方案

我找到的一个选项,但我发现它相当“不整洁”(包括options(width = ...)在代码的顶部。但我不希望它出现在输出中,我更喜欢在表示中设置宽度-称呼。

options(width = 205)
(x <- 1:100)
#>   [1]   1   2   3   4   5   6   7   8   9  10  11  12  13  14  15  16  17  18  19  20  21  22  23  24  25  26  27  28  29  30  31  32  33  34  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50
#>  [51]  51  52  53  54  55  56  57  58  59  60  61  62  63  64  65  66  67  68  69  70  71  72  73  74  75  76  77  78  79  80  81  82  83  84  85  86  87  88  89  90  91  92  93  94  95  96  97  98  99 100

reprex()允许 knitr's opts-chunk,但我无法使用它reprex::reprex(venue = "so", opts_chunk = list(out.width = 205))(这可能与#421有关,如此处所指出的长行文本输出))

有更好的解决方案吗?

4

1 回答 1

1

reprex具有设置这些选项的语法,但不将它们包含在输出降价中(参见此处的示例)。在这种情况下:

reprex({

  #+ setup, include = FALSE
  options(width=205)

  #+ actual-reprex-code
  (x <- 1:100)

}, venue = 'so')

输出您想要的格式:

(x <- 1:100)
#>   [1]   1   2   3   4   5   6   7   8   9  10  11  12  13  14  15  16  17  18  19  20  21  22  23  24  25  26  27  28  29  30  31  32  33  34  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50
#>  [51]  51  52  53  54  55  56  57  58  59  60  61  62  63  64  65  66  67  68  69  70  71  72  73  74  75  76  77  78  79  80  81  82  83  84  85  86  87  88  89  90  91  92  93  94  95  96  97  98  99 100

reprex 包(v0.2.1)于 2018 年 9 月 21 日创建

于 2018-09-21T16:10:07.840 回答