R语言斜体迭代

Question

对于这个非常愚蠢的问题，我深表歉意，我已经在 google 上搜索了一段时间，但没有找到解决方案。我需要迭代地创建几个图，其标题是 (1) 从先前创建的向量中选取的，并且 (2) 必须是斜体。我尝试了几个选项都没有足够的结果，像这样：

# Main titles
m <- paste(LETTERS[1:10], LETTERS[11:20])
# Plots
for(i in 1:10){
     x <- runif(10, 1, 20)
     y <- runif(10, 1, 20)
     X11()
     plot(x,y, main = expression(italic(m[i])))
}

但我得到的是带有“m”和“i”作为下标的图，而不是向量中的相应内容。有什么想法吗？

Answer 1

这是实现你想要的方法

# Main titles
m <- paste(LETTERS[1:10], LETTERS[11:20])
# Plots
for(i in 1:10){
  x <- runif(10, 1, 20)
  y <- runif(10, 1, 20)
  X11()
  plot(x,y, main = substitute(paste(italic(x)), list(x = m[i])))
}

情节之一

Answer 2

另一种选择是使用 bquote。 .() 中的表达式将被计算：

plot(x,y, main = bquote(italic(.(m[i]))) )

R语言斜体迭代

R language italicize iteratively gera

plot

r

title

italics