Embedded Files
功能說明：
令 R 可使用本機所有可用字型
範例分一般版 (plot) 及進階版 (ggplot2)
範例輸出至 PDF 格式
在進階版範例中，使用數學式當標籤
事前準備：當標籤
install.packages("extrafont")
library(extrafont)
font_import()
程式碼：
library(extrafont) loadfonts() pdf("1.pdf", family="Ubuntu Mono", width=4, height=4) plot(mtcars$mpg, mtcars$wt, main = "Fuel Efficiency of 32 Cars", xlab = "Weight (x1000 lb)", ylab = "Gallon/Miles") dev.off()
安裝後檢查：
fonts()
運用字型：
library(extrafont)
loadfonts()
程式碼：
library(ggplot2) library(extrafont) loadfonts() p <- ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point() + ggtitle("Fuel Efficiency of 32 Cars") + ylab("Gallon/Miles") + theme_bw() + theme(text=element_text(family="Ubuntu Mono", size=12)) + xlab(expression(Weight:~{10}^{3}~lb)) ggsave("2.pdf", p, width=4, height=4)
Page updated
Google Sites
Report abuse