R - 如何在绘制的文本中添加换行符

Question

说我在R中有一个情节：

plot(c(0, 1), c(0, 1), ann = F, bty = 'n', type = 'n', xaxt = 'n', yaxt = 'n');

我有一个评论载体：

comments = c("cool use of a string", "wow", "very very interesting")

然后我想绘制一些文字：

text(x = 0, y = 0.5, comments, cex = 0.9, col = "black", adj=0);

这将覆盖同一位置的每一行，导致黑色模糊混乱。它也超过了我希望在每一行上看到的字符数。当然，我可以打电话给strwrap，但是添加一个＆＃34; \ n＆＃34;我不会像我一样添加新行。

text(x = 0, y = 0.5, strwrap(comments, width=15, prefix="\n"), cex = 0.9, col = "black", adj=0);

我的问题：如何绘制一个字符串数组，以便每行包裹15个字符，每个字符串都绘制在一个新行上？

Answer 1

您只需要以下列方式使用paste，它就会显示正常：

plot(c(0, 1), c(0, 1), ann = F, bty = 'n', type = 'n', xaxt = 'n', yaxt = 'n')

comments = c("cool use of a string", "wow", "very very interesting")

text(x = 0, y = 0.5, paste(strwrap(comments, width=15, prefix="\n"),collapse=''), 
     cex = 0.9, col = "black", adj=0);

因此，字面上唯一需要的是使用paste将strwrap生成的矢量转换为单个字符串，然后绘制。请记住使用collapse=''，以便单个字符串之间没有字符。

输出（只有单词的空白图;正如您设计/想要的那样）：