※ 引述《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

非常谢谢你迅速的回答，因为我没存成图片，造成图形被压缩http://i.imgur.com/EX7VEzh.png?1。看到您的方法后，了解到必须存成图片才会有比较好的效果。真的谢谢您的帮忙，人在德国依旧感觉像在台湾 :)