在plotmath()中使用两个变量和一个表达式

Question

我想做这样的事情：

Title<-paste(typis[which.panel],bquote(nu[x]==.(typas[which.panel])),sep="")

其中，typas是数字的向量，而typis是字符的向量，例如：

typas<-1:3
typis<-letters[1:3]

which.panel是1:3的整数(这是因为Title将根据面板的不同而变化)

并且nu[x]应该显示为plotmath对象。但是R忽略了paste中逗号后面的所有内容:(

Answer 1

现在还不清楚您想要什么，但如果它只是一个包含这两位信息的表达式，则不需要paste()，只需在bquote()调用中包含这两位，并根据您需要的空间大小用一个或多个~分隔它们。要注意的关键一点是，bquote()可以接受您想包含的任意多个不同的.()。

typas <- 1:3
typis <- letters[1:3]
which.panel <- 2
expr <- bquote(.(typis[which.panel]) ~~ nu[x]==.(typas[which.panel]))

plot(1:10, main = expr)

expr2 <-
  bquote(.(paste0(typis[which.panel], ":")) ~~ nu[x]==.(typas[which.panel]))
plot(1:10, main = expr2)

当然，这可以在表达式之外完成：

typis2 <- paste0(letters[1:3], ":")
expr3 <- bquote(.(typis2[which.panel]) ~~ nu[x]==.(typas[which.panel]))
plot(1:10, main = expr3)

这三个图如下所示：

​

​

后两者在本质上是等价的。