我想用包含 4 行的 bquote 绘制一个图例 (kappa=0.5, kappa=1, kappa=1.5, kappa=5)。
范例:
kappa_var <- c(0.5, 1.0, 1.5, 5.0)
plot(1000, type="n", xlab="x", ylab= expression(paste("f(x;",kappa,",",sigma,")",sep="")),
xlim=c(0, 5), ylim=c(0, 6))
legend("topleft",legend=do.call( 'expression', list( bquote( kappa == .(kappa_var)))))
但是我只能管理 bquote 表达 kappa_var 的第一个条目而不是所有条目
最佳答案
尝试使用 bquote 标签列表中的 as.expression 创建一个表达式向量:
legend("topleft", legend = as.expression(sapply(kappa_var, function(var) bquote(kappa == .(var)))))
关于r - 图例将 bquote 与向量变量一起使用，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/58048861/