如何调整R中的文本宽度?

How to adjust text width in R?

是否有执行此操作的函数?

输入:

text <- "I have a little dog"

期望的输出:

some_function(text, max_width = 8)

#output: "I have a\nlittle dog"

some_function(text, max_width = 15)
  
#output: "I have a little\ndog"

stringr::str_wrap 这样做:

text <- "I have a little dog"
stringr::str_wrap(text, 15)
#[1] "I have a little\ndog"

在某些情况下,由于使用的底层算法不同,输出可能会有所不同。

stringr::str_wrap(text, 8)
[1] "I have\na little\ndog"