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