R 表达式()中的换行符

发布于08月15日

我在R中有以下柱状图:

hist(
  alpha, cex.main=2, cex.axis=1.2, cex.lab=1.2,
  main=expression(
    paste("Histogram of ", hat(mu), ", Bootstrap samples, Allianz")
  )
)

标题太长了，所以我想换行.根据这个我试了thread次

hist(
  alpha, cex.main=2, cex.axis=1.2, cex.lab=1.2,
  main=expression(
    paste("Histogram of ", hat(mu), ",cat("\n") Bootstrap samples, Allianz")
  )
)

或

hist(
  alpha, cex.main=2, cex.axis=1.2, cex.lab=1.2,
  main=expression(
    paste("Histogram of ",hat(mu), cat("\n"),", Bootstrap samples, Allianz")
  )
)

But both do not w或k, how can I get a line break in paste()?

推荐答案

你可以很容易地在常规paste中使用换行符，但这是plotmath paste(实际上是一个没有'sep'参数的不同函数)，并且(长)?plotmath页明确告诉你这是无法完成的.那你的工作是什么？使用plotmath函数atop是一个简单的选项:

expression(atop("Histogram of "*hat(mu), Bootstrap~samples*','~Allianz))

这将在逗号处断开，并使plotmath表达式居中.还有更复杂的 Select .

这说明了如何打印到图形文件.具有讽刺意味的是，第一次try 给了我一个展示，它确实对"帽子"有问题(那些是旋转的吗？)这说明了如何提高利润率.顶部边距可能是第三个数字，因此c(3,3,8,0)可能更适合您:

 pdf("test.pdf") ;  par(mar=c(10,10,10,10))
 hist(1:10,cex.main=2,cex.axis=1.2,cex.lab=1.2,
 main=expression(atop("Histogram of "*hat(mu), 
                       Bootstrap~samples * ',' ~Allianz)))
 dev.off() # don't need to restore;  this 'par' only applies to pdf()

R 表达式()中的换行符

推荐答案

R相关问答推荐

pivot_longer：names_to和names_pattern

将收件箱变量传递给ggplot 2函数

使用列表列作为case_when LHS的输入

R通过字符串中的索引连接数据帧r

R中的枢轴/转置

如何从其他前面列中减go 特定列的平均值？

对lme 4对象运行summary()时出错(diag中的错误(from，names = RST)：对象unpackedMatrix_diag_get找不到)

如何在kableextra调用cell_spec()中忽略NA？

将非重复序列高效转换为长格式

用相同方法得到不同函数的ROC最优截断值

如何写一个R函数来旋转最后n分钟？

使用R闪光显示所有数据点作为默认设置

将多列合并为单独的名称—值对

如何通过判断数据框的一列来压缩另一列？

汇总数据帧中的复制列，保持行的唯一性

我们如何在R中透视数据并在之后添加计算

为R中的16组参数生成10000个样本的有效方法是什么？

如何预测原始数据集并将值添加到原始数据集中

如何在R中创建条形图，使条形图在y轴上围绕0.5而不是0构建条形图？

计算来自单独分组的分幅的值的百分位数