R 如何更改levelplot字体系列？

我需要更改levelplot graph的文本字体系列，我尝试了此操作，但没有成功：

levelplot(a,main=list(label="title",cex=1,fontfamily = "sans" ))

或

没有什么变化。我想换几次

---

谢谢。

你可以在 Tr.L.Par。GET（）/<代码>列表中找到很多这些设置。使用

par.settings

参数覆盖特定绘图的参数。下面是使用

levelplot

页面中的测试代码的示例

x <- seq(pi/4, 5 * pi, length.out = 100)
y <- seq(pi/4, 5 * pi, length.out = 100)
r <- as.vector(sqrt(outer(x^2, y^2, "+")))
grid <- expand.grid(x=x, y=y)
grid$z <- cos(r^2) * exp(-r/(pi^3))
levelplot(z~x*y, grid, cuts = 50, scales=list(log="e"), xlab="",
    ylab="", main="Weird Function", sub="with log scales",
    colorkey = FALSE, region = TRUE,
    par.settings=list(axis.text=list(fontfamily="serif"),
    par.xlab.text=list(fontfamily="serif"),
    par.ylab.text=list(fontfamily="serif"),
    par.main.text=list(fontfamily="serif"),
    par.sub.text=list(fontfamily="serif")
))

---

x谢谢，我对R中的句柄图还是比较新的，谢谢。我将阅读有关PART设置的信息。再次感谢。
x <- seq(pi/4, 5 * pi, length.out = 100)
y <- seq(pi/4, 5 * pi, length.out = 100)
r <- as.vector(sqrt(outer(x^2, y^2, "+")))
grid <- expand.grid(x=x, y=y)
grid$z <- cos(r^2) * exp(-r/(pi^3))
levelplot(z~x*y, grid, cuts = 50, scales=list(log="e"), xlab="",
    ylab="", main="Weird Function", sub="with log scales",
    colorkey = FALSE, region = TRUE,
    par.settings=list(axis.text=list(fontfamily="serif"),
    par.xlab.text=list(fontfamily="serif"),
    par.ylab.text=list(fontfamily="serif"),
    par.main.text=list(fontfamily="serif"),
    par.sub.text=list(fontfamily="serif")
))