在系統字型儲存盤中找到想要的字型,右鍵-屬性找到其真正的名字。例如:楷書的名字為「simkai.ttf」
使用font_add函式新增字型
library(showtext)
font_add(myfont, "simkai.ttf") ##新增字型
font.families() ##檢視新增的字型
[1] "sans" "serif" "mono" "wqy-microhei" "myfont"
使用showtext包中的函式載入和去掉字型
showtext.begin()##載入字型
showtext.end()##去掉字型
使用cairo
包匯出:我們在用作圖的時候會發現,如果含有中文的話,通過showtext
設定了語言。**在儲存為png或者jpeg格式的時候是發現字型改變了。但是如果在儲存為pdf格式的時候會發現中文全是…或者會發生錯誤。**這個時候就需要用到cairo
包中了。
cairo.capabilities() ##檢視cairo包支援的所有匯出格式
png jpeg tiff pdf svg ps x11 win raster
true false false true true true false true true
通過上面的兩個包我們就很輕鬆的解決了r語言中匯出pdf格式的時候亂碼的問題。下面來一段示例看一下吧
library("showtext")
setwd("c:/users/administrator/desktop")
td# font_add( "myfont",simkai.ttf") ##新增字型
# font.families() ##檢視新增的字型
# showtext_begin() ##使用字型
# showtext_end() ##停止使用字型
library("ggplot2")
library("cairo")
font_add("myfont","stcaiyun.ttf") ##載入華文彩雲字型
font.families() #顯示字型
#[1] "sans" "serif" "mono" "wqy-microhei" "myfont" "wmpeople1"
cairopdf("mm.pdf")
showtext_begin() ##使用字型
ggplot(diamonds,aes(color,fill=cut))+geom_bar()+ggtitle("鑽石質量情況")+theme(title=element_text(family="myfont"))
showtext_end() ##停止使用字型
dev.off()
system(paste(getoption('pdfviewer'),file.path(td,'mm.pdf')))
效果如下:
**可見:
R語言中呼叫windows中的字型方法
windowsfonts a windowsfont 華文彩雲 這裡使用的是字型的主題名稱 b windowsfont 華文仿宋 c windowsfont 華文行楷 d windowsfont 華文楷體 e windowsfont 華文隸書 f windowsfont 華文中宋 g windows...
Visual C 中呼叫Windows服務初探
這裡把執行緒的優先順序設到最低,這樣不會耗用過多的系統效能。這個執行緒物件使用threadfunc作為執行緒函式,因此將這個執行緒函式補充完整 public static void threadfunc 安裝完後能過系統的服務管理器你就可以看到你的服務了,只要點選啟動就可以把它啟動,把時間向前改乙個...
linux去掉windows下檔案中的 r
參考 unix體系裡,每行結尾只有 換行 即 n windows體系裡面,每行結尾是 換行 回 車 即 n r 乙個直接結果是,unix體系下的檔案在windows裡開啟的話,所有文字會變成一行 而windows裡的檔案在unix下開啟的話,在每行的結尾可能會多出乙個 m符號。好了,所以我的題目就出...