r - 如何在 R 的绘图标题中显示 $\{ X_t \}$

Question

如何在 R 的绘图标题中显示 $\{ X_t \}$ 的乳胶？

例如

 plot(slot(x,"GRID"),slot(x,"PATH"),type="l", xlab="Time t",ylab="X",
 main=paste("Simulation of \{X_t\}"))

谢谢！

Answer 1

假设您将为插槽表达式提供有意义的参数，那么我认为这是您想要的合理机会：

plot(1:10,1:10,type="l", xlab="Time t",ylab="X",
      main=expression("Simulation of {"*X[t]*"}"))

这是一个绘图表达式，将“t”表示为“X”的下标，并且该表达式包含在花括号中。如果我误读了您的请求，请注意“*”字符是 plotmath 语法中的分隔符，而大括号只是可以删除的字符。（对于我们这些只使用 plotmath 语法的人来说，LaTeX 表达式没有多大意义，所以用散文或数学术语描述你想要的东西对于任何澄清都会更好。）

Answer 2

要让 R 模拟 LaTeX 排版，请参阅 中描述的示例和方法?plotmath。

要真正让 LaTeX 排版您的绘图文本，请使用包tikz()提供的图形设备tikzDevice。

Answer 3

plotmathgroup()函数可用于形式化 DWin 的答案。此解决方案的优点（恕我直言）不使用字符串作为表达式的一部分。相反，我们使用~运算符来添加间距（空白被忽略）。

plot(1:10, 1:10, type = "l", xlab = "Time t", ylab = "X",
     main=expression(Simulation ~ of ~ group("{", X[t], "}")))

plotmathbgroup()函数提供可扩展的分隔符，但使用方式与上面的示例代码相同。

编辑（回应 ran2 的评论）：使用 plotmath 的力量，可以在 ggplot 和 lattice 中使用相同的方法，就像使用基本图形一样。例如

require(ggplot2)
df <- data.frame(A = 1:10, B = 1:10)
qplot(A, B, data = df,
      main = expression(Simulation ~ of ~ group("{", X[t], "}")))