如何在R语言中格式化多行消息并实现自定义硬换行？

要让message(strwrap())输出的消息里实现指定位置的硬换行，你可以用以下两种实用方法：

方法1：拆分消息分段处理 #

把需要硬换行的内容拆成独立段落，分别用strwrap处理后，用换行符\n拼接起来传给message。这样每个段落会自动适配宽度换行，段落之间则保留硬分隔。

示例代码：

msg_part1 <- strwrap(prefix = " ", initial = "", 
                     "If you got to this point in the code, it means the matrix was empty.")
msg_part2 <- strwrap(prefix = " ", initial = "", 
                     "Calculation continues but you should consider re-evaluating an earlier step in the process")
message(paste(msg_part1, msg_part2, sep = "\n"))

方法2：用自定义标记拆分后拼接 #

如果不想手动拆分字符串，可以在原始消息中插入自定义标记（比如---）标记硬换行位置，拆分后分别处理每个段落再拼接。

示例代码：

raw_msg <- "If you got to this point in the code, it means the matrix was empty.---Calculation continues but you should consider re-evaluating an earlier step in the process"
# 按标记拆分消息段落
msg_segments <- strsplit(raw_msg, "---")[[1]]
# 对每个段落单独做自动换行处理
wrapped_segments <- sapply(msg_segments, function(seg) {
  strwrap(seg, prefix = " ", initial = "")
})
# 用硬换行符拼接段落
message(paste(wrapped_segments, collapse = "\n"))

这两种方法都能让「Calculation continues」部分单独起一行，同时保留strwrap自动适配宽度换行的优势，让消息在IDE中排版更整洁。

内容的提问来源于stack exchange，提问作者Michael Roswell