R_Language 板


LINE

ctrl + y 可以刪除一整行,請將不需要的內容刪除 文章分類提示: - 問題: 當你想要問問題時,請使用這個類別。 建議先到 http://tinyurl.com/mnerchs 搜尋本板舊文。 - 分享: 當你看到別人的心得時,請使用這個類別。 版主鼓勵你幫版友歸納重點(選擇性)。 - 情報: 當你看到消息時,請使用這個類別。 版主鼓勵你幫版友歸納重點(選擇性)。 - 心得: 當你自己想要分享經驗時,請使用這個類別。 - 討論: 當你自己已經有答案,但是也想聽聽版友意見時。 [問題類型]: 程式諮詢(我想用R 做某件事情,但是我不知道要怎麼用R 寫出來) [軟體熟悉度]: 使用者(已經有用R 做過不少作品) [問題敘述]: 我的電腦是Mac OS Sierra (1)我想用R軟體的ggplot2繪圖,並用gridExtra套件輸出於pdf檔 如果圖中沒有中文,完全沒問題。如果圖中有中文(例如標題有中文),則無法顯示或出現錯誤訊息 我想用中文楷體 已在電腦內安裝”Kaiti TC” 但始終無法正確印出 聽說裝Macport,Cairo可解決,但我一直無法成功 https://groups.google.com/forum/#!topic/r-sig-mac/7IrhMr1K264 (2) 另外一個問題是Latex中文問題 我是用TeXStudio 我可以打英文文件,做英文beamer 也可打簡單的中文文件,可用楷體 但嘗試做中文beamer,卻始終無法成功(沒有選擇字體) 如果有人能跟我在台大附近碰面,幫我解決這兩個問題 我請您喝杯茶吃點心,致贈500元新台幣 我方便的時間:週六白天或週日下午,台大新生南路對面或巷子內的餐廳 請留聯絡方式 [程式範例]: R程式碼 #rm(list=ls()) library(ggplot2) library(gridExtra) df1<-data.frame(x=1:2, y=3:4, z=5:6) #p1<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("test1") #p2<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("test2") p1<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("測試") #Chinese title p2<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("中文") #Chinese title p1<-p1+theme(text = element_text(family = "Kaiti TC")) p2<-p2+theme(text = element_text(family = "Kaiti TC")) p<-array(list(NA), dim=2) p[[1]]<-p1 p[[2]]<-p2 p_series <- lapply(1:(length(p)), function(.x) p[.x][[1]]) m2 <- marrangeGrob(p_series, nrow=2, ncol=1) ggsave("test_plot_chinese.pdf", m2) R錯誤訊息 "Saving 7.47 x 5.15 in image Error in grid.Call.graphics(L_text, as.graphicsAnnot(x$label), x$x, x$y, : invalid font type In addition: There were 50 or more warnings (use warnings() to see the first 50)" [環境敘述]: R version 3.3.1 (2016-06-21) Platform: x86_64-apple-darwin13.4.0 (64-bit) Running under: OS X 10.12.6 (Sierra) locale: [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8 attached base packages: [1] stats graphics grDevices utils datasets methods [7] base loaded via a namespace (and not attached): [1] tools_3.3.1 [關鍵字]: 選擇性,也許未來有用 --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.162.46.210
※ 文章網址: https://webptt.com/m.aspx?n=bbs/R_Language/M.1510668228.A.C35.html
1F:推 andrew43: 有latex板喔,有空去看看。 11/14 22:52
2F:推 bluecadence: 你的第一個問題,應該只發生在要輸出成pdf檔案才會發 11/14 23:34
3F:→ bluecadence: 出現是嗎? 輸出成 jpg 之類的檔案不會發生,直接在 11/14 23:36
4F:→ bluecadence: 螢幕顯示也不會有問題對嗎? 我的FreeBSD系統也有這樣 11/14 23:37
5F:→ bluecadence: 的症頭。的確在ggsave裡面使用 device=cairo_pdf 參 11/14 23:38
6F:→ bluecadence: 數後能夠解決這個pdf字型問題。 11/14 23:40
7F:→ ewmm: 照您建議,我把cairo_pdf那一行改成ggsave("test_plot_chine 11/28 08:57
8F:→ ewmm: ese.pdf", m2, device=cairo_pdf),沒有錯誤訊息,但pdf中, 11/28 08:58
9F:→ ewmm: 中文也沒顯示 11/28 08:59
10F:推 bluecadence: 這個問題可能需要從兩個層面解決 1. 作業系統必須安 11/28 18:26
11F:→ bluecadence: 裝 cairo 套件 (Vector graphics library with cross 11/28 18:27
12F:→ bluecadence: -device output support) 2.你的 R 當初在編譯的時候 11/28 18:28
13F:→ bluecadence: (不管你是下載binary package 或是下載原始碼自行 11/28 18:28
14F:→ bluecadence: compile) 必須要把 cairo support 編譯進去 11/28 18:29
15F:→ bluecadence: 我會建議這樣做 1. 先在 Mac 中把 cairo 裝好 2. 自 11/28 18:32
16F:→ bluecadence: 行下載R的原始碼進行編譯,你的系統如果cairo安裝正 11/28 18:34
17F:→ bluecadence: 確,編譯R的時候(./configure 的步驟)會偵測到cairo 11/28 18:35
18F:→ bluecadence: 自動把cairo support編譯進R套件中 11/28 18:37
19F:→ bluecadence: 我手邊目前沒有mac機器 但在FreeBSD 或 Linux 都是這 11/28 18:39
20F:→ bluecadence: 麼做。我相信MacOS和FreeBSD的行為應該有點類似。 11/28 18:41
21F:→ bluecadence: 你可以在R中下這個指令 "capabilities()" 然後把結果 11/28 19:17
22F:→ bluecadence: 貼上來嗎? 11/28 19:17
23F:→ bluecadence: 如果你的R有編譯cairo支援 應該要像這樣 11/28 19:42
24F:→ bluecadence: https://imgur.com/FeKaXp8 11/28 19:43
25F:→ ewmm: 謝謝,我使用capabilities指令結果如下 12/26 14:11







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:Soft_Job站內搜尋

TOP