我在R语言脚本中有一个饼图。我想在Times New Roman字体中找到传说和数字,但是尽管我在Google中看到了很多解决方案,但都没有用。我的代码如下:
library("readr")
library("fmsb")
library("car")
library("normtest")
library("nortest")
library("moments")
library("readxl")
library("ggplot2")
library("stats")
library("lsr")
categorias <-c("Básica",
"Media",
"Superior (IP o CFT)",
"Superior universitaria",
"Postrado")
contar <-c(10,
27,
15,
16,
1)
par(family="Times New Roman")
piepercent<- round(100*contar/sum(contar), 2)
lbls <- paste(piepercent) # add percents to labels
lbls <- paste(lbls,"%",sep="")
png(file="NIVEL_EDUCACIONAL.eps")
pie(contar, radius=1.0,labels = lbls,col = rainbow(length(contar)))
legend("topleft",categorias, cex = 0.9, fill = rainbow(length(contar)))
dev.off()
任何想法?在此先感谢和问候:D
Times New Roman
通常是默认的衬线字体。用windowsFonts()
进行验证。然后调用默认字体而不是特定字体:
par(family = 'serif')