如何更改此 R 图中的字体系列?
How to change font family in this R plot?
我正在尝试将轴和图例的字体更改为衬线,但添加 family='serif'
对图例不起作用。我应该怎么做?
plot(sort(n.cdf),pch=3,cex = 0.5,xlab="Order",ylab="Cn",family="serif")
par(new=TRUE)
plot(sort(emp.c),col="red",pch=1,cex = 0.5,ann=FALSE, axes=FALSE)
par(new=TRUE)
legend( "topleft"
, inset = c(0,0.1)
, cex = 1
, bty = "n"
, legend = c("Simulated", "Empirical")
, text.col = c("black", "red")
, pt.bg = c("black", "red")
, pch = c(3,1)
, family=c("serif")
)
在调用 legend()
之前将 family
绘图参数设置为您想要的值。通过显式调用 par()
.
来执行此操作
这是一个例子:
x <- y <- 1:10
plot(x, y, type = "n")
text(x = 5, y = 5, labels = "foo", family = "serif")
## set the font family to "serif"
## saving defaults in `op`
op <- par(family = "serif")
## plot legend as usual
legend( ... )
## reset plotting parameters
par(op)
我正在尝试将轴和图例的字体更改为衬线,但添加 family='serif'
对图例不起作用。我应该怎么做?
plot(sort(n.cdf),pch=3,cex = 0.5,xlab="Order",ylab="Cn",family="serif")
par(new=TRUE)
plot(sort(emp.c),col="red",pch=1,cex = 0.5,ann=FALSE, axes=FALSE)
par(new=TRUE)
legend( "topleft"
, inset = c(0,0.1)
, cex = 1
, bty = "n"
, legend = c("Simulated", "Empirical")
, text.col = c("black", "red")
, pt.bg = c("black", "red")
, pch = c(3,1)
, family=c("serif")
)
在调用 legend()
之前将 family
绘图参数设置为您想要的值。通过显式调用 par()
.
这是一个例子:
x <- y <- 1:10
plot(x, y, type = "n")
text(x = 5, y = 5, labels = "foo", family = "serif")
## set the font family to "serif"
## saving defaults in `op`
op <- par(family = "serif")
## plot legend as usual
legend( ... )
## reset plotting parameters
par(op)