回答
的格包往往(但并不总是)忽略相提并论命令,所以我只是避免出现打印W/格时使用它。
将多个格子情节单页上:
创建(但不积)格/网格情节对象,然后
致电打印每个地块一次
每个打印呼叫,通过在(i)所述情节参数; (ⅱ) 更,设置为TRUE,并且其仅通过在用于初始调用打印,和(iii)POS,这给对每个小区的位置页面分别指定为曲线的左下角和右上角 拐角处的xy坐标对 - 即,具有四个数字的矢量。
更容易表现出比告诉:
data(AirPassengers) # a dataset supplied with base R
AP = AirPassengers # re-bind to save some typing
# split the AP data set into two pieces
# so that we have unique data for each of the two plots
w1 = window(AP, start=c(1949, 1), end=c(1952, 1))
w2 = window(AP, start=c(1952, 1), end=c(1960, 12))
px1 = xyplot(w1)
px2 = xyplot(w2)
# arrange the two plots vertically
print(px1, position=c(0, .6, 1, 1), more=TRUE)
print(px2, position=c(0, 0, 1, .4))
另请参见'print.trellis'的'split'参数和Murrell的“R图形”的第5.8节http://books.google.co.uk/books?id=78P4zntHHVQC – 2010-03-31 10:42:37
如果有公共坐标轴,'c 'latticeExtra'包中的.trellis'快捷方式也很有用。 – qoheleth 2014-12-24 00:58:58
的“格子”包是建立在格包,当“格子”装载重视它的命名空间。但是,为了使用grid.layout
函数,您需要明确地指定load()
pkg :: grid。另一种选择,这可能是更容易,是在pkg的grid.arrange
功能:: gridExtra:
install.packages("gridExtra")
require(gridExtra) # also loads grid
require(lattice)
x <- seq(pi/4, 5 * pi, length.out = 100)
y <- seq(pi/4, 5 * pi, length.out = 100)
r <- as.vector(sqrt(outer(x^2, y^2, "+")))
grid <- expand.grid(x=x, y=y)
grid$z <- cos(r^2) * exp(-r/(pi^3))
plot1 <- levelplot(z~x*y, grid, cuts = 50, scales=list(log="e"), xlab="",
ylab="", main="Weird Function", sub="with log scales",
colorkey = FALSE, region = TRUE)
plot2 <- levelplot(z~x*y, grid, cuts = 50, scales=list(log="e"), xlab="",
ylab="", main="Weird Function", sub="with log scales",
colorkey = FALSE, region = TRUE)
grid.arrange(plot1,plot2, ncol=2)
这是简单,一旦你读?print.trellis
做。特别感兴趣的是split
参数。看起来似乎很复杂,但一旦你理解它的意思,这很简单。从文档:
split:一个由4个整数组成的向量c(x,y,nx,ny),它表示将当前绘图定位在x,y位置,地块。(注:这有原点在左上角)
你可以看到example(print.trellis)
一对夫妇实现的,但这里有一个我喜欢:
library(lattice)
# Data
w <- as.matrix(dist(Loblolly))
x <- as.matrix(dist(HairEyeColor))
y <- as.matrix(dist(rock))
z <- as.matrix(dist(women))
# Plot assignments
pw <- levelplot(w, scales = list(draw = FALSE)) # "scales..." removes axes
px <- levelplot(x, scales = list(draw = FALSE))
py <- levelplot(y, scales = list(draw = FALSE))
pz <- levelplot(z, scales = list(draw = FALSE))
# Plot prints
print(pw, split = c(1, 1, 2, 2), more = TRUE)
print(px, split = c(2, 1, 2, 2), more = TRUE)
print(py, split = c(1, 2, 2, 2), more = TRUE)
print(pz, split = c(2, 2, 2, 2), more = FALSE) # more = FALSE is redundant
正如您所见,split
需要四个参数。 最后两个指的是您的帧的大小(类似于mfrow
所做的),而参数将您的绘图定位到nx
的ny
帧。
- 1. 在一个窗口(MVVM)中有多个视图
- 2. 在同一个窗口中绘制一个或多个绘图
- 3. 在一个XIB文件中的多个视图(一个窗口)
- 4. 找出一个窗口有一个子窗口
- 5. 合并多个窗口,一个窗口
- 6. 一个窗口,多个视图(VB .Net)
- 7. 如何在matlab中的一个窗口中显示多个图?
- 8. 合并多个窗口组件到一个模块中
- 9. 单个窗口中的多个图
- 10. RStudio - 在多个窗口中的绘图
- 11. 在Matlab的一个窗口中显示多个图像
- 12. 在一个窗口中显示多个视图
- 13. Mac - 多个窗口或多个视图?
- 14. 在tkinter的同一个窗口中绘制一个图形和一个表格
- 15. 在另一个wpf窗口内部有一个wpf窗口
- 16. 如何在一个WPF应用程序中有多个窗口?
- 17. 多个窗口
- 18. 在PyQt的一个窗口中显示另一个窗口
- 19. tkinter中多个窗口的多个窗口大小
- 20. 在现有窗口中创建一个新窗口
- 21. 我们可以在Telerik Modal窗口中有一个网格吗?
- 22. 一个窗口中有多个WPFPreviewHandlers?可以做到吗?
- 23. 用Python OpenCV在同一窗口中显示多个图像?
- 24. 在OpenCV的同一窗口中显示多个(2,3,4,...)图像
- 25. 在ggplot中,如何在同一个窗口中绘制多个图形?
- 26. OpenGL多个子窗口问题
- 27. 书签中的多个窗口在一个页面中
- 28. PyQt4中的多个窗口?
- 29. 在Apache Beam中强制传输一个空窗格/窗口
- 30. 如何在主图窗口中停靠多个图/图像?
'lattice'图通常不使用'par'设置。他们有自己的一组来自Grid图形的设置。请参阅'?trellis.par.get'获取解释。 – James 2010-03-30 12:56:39