Re: [問題] xyplot 文字大小調整

作者: celestialgod (天)   2016-05-02 23:28:13
※ 引述《decken (HAHAHA~)》之銘言:
: [問題類型]:
:
: 程式諮詢(我想用R 做某件事情,但是我不知道要怎麼用R 寫出來)
:
: [軟體熟悉度]:
: 入門(寫過其他程式,只是對語法不熟悉)
: [問題敘述]:
: 使用xyplot畫圖時,文字太大導致圖形太小
: 錯誤圖片:http://i.imgur.com/wpVk3T1.png?1
: 正確圖片:http://i.imgur.com/hj80j9x.png?1
: Google了許久,找不到參數可以把圖形的範圍拉大,
: 不知道版友們有遇過類似的問題嗎?
: 謝謝~
:
: [程式範例]:
:
: data1 <-
: read.table("C:/Users/YOUR_NAME/Desktop/lq.dat", header=T)
: attach(data1)
: library(package = "lattice")
: xyplot(lq~timestamp|ip*neighbor, data=data1)
: detach(data1)
:
: ====================================
: lq.dat 下載 - https://goo.gl/WtFo3W
其實我看不太懂你的問題,xyplot有很多個cex可以調,我調幾個給你看一下
不確定你要調的參數是哪一個,就把圖都存下來傳到imgur去了
有什麼問題可以再推文告知
library(data.table)
library(lattice)
dat <- fread("lq.dat")
png("test.png", 1500, 900)
xyplot(lq ~ timestamp | ip * neighbor, data = dat)
dev.off()
存下來的圖:http://i.imgur.com/2sYN96l.png
要多大都可以透過png去調高度、寬度
png("test2.png", 1500, 2000)
xyplot(lq ~ timestamp | ip * neighbor, data = dat,
par.strip.text = list(cex = 2))
dev.off()
存下來的圖:http://i.imgur.com/JTznnm4.png
png("test3.png", 1500, 2000)
xyplot(lq ~ timestamp | ip * neighbor, data = dat, cex = 2,
scales = list(cex = 3), par.strip.text = list(cex = 2))
dev.off()
存下來的圖:http://i.imgur.com/hs8tLL4.png
作者: decken (HAHAHA~)   2016-05-03 01:05:00
非常謝謝你迅速的回答,因為我沒存成圖片,造成圖形被壓縮http://i.imgur.com/EX7VEzh.png?1。看到您的方法後,了解到必須存成圖片才會有比較好的效果。真的謝謝您的幫忙,人在德國依舊感覺像在台灣 :)

Links booklink

Contact Us: admin [ a t ] ucptt.com