0

所以我有一个相当大的 GPS 位置数据集，对应于不同时间的不同个体。它看起来像一个更复杂的版本......

ID________________Year________________Julian.date________________Distance

1_________________2003______________________15_____________________200

1_________________2004______________________20_____________________500

1_________________2005______________________24_____________________462

1_________________2006______________________28_____________________51

2_________________2002______________________12_____________________248

2_________________2003______________________15_____________________571

2_________________2004______________________16_____________________685

3_________________2003______________________20_____________________521

3_________________2004______________________25_____________________1251

3_________________2005______________________29_____________________225

3_________________2006______________________54_____________________144

我要做的是按年份和个人将数据分开。所以每个人都有一个他们的距离和相应的儒略日期的箱线图。我可以使用 lattice 包在一张纸上创建所有图（12X11）的大量 pdf（分隔符是结合了 ID 和年份列的列）..

> barchart(Julian.date~Distance|factor(Separator),data=data)

这并不是特别有用，因为我对如此庞大的 pdf 无能为力。所以我尝试使用...将每张纸的图数限制为 1

> barchart(Julian.date~Distance|factor(Separator),data=data,layout=c(1,1))

这导致所有的情节都从我身边飞过，并且没有一个导出为 pdf。我试图寻找一种方法来实现这一点，但到目前为止还没有运气。如果有人知道在它们飞过时让它们出口的方法，我将非常感激。

因此，如果有人可以提供帮助，请提前感谢。如果您需要更多信息，请告诉我，我倾向于不正确使用这些术语。

艾登

4

1 回答 1

2

我不确定您在做什么，或者因为您没有显示代码而做错了，但是使用从?barchart我看到使用此代码的多页 PDF 修改的示例：

foo <- barchart(yield ~ variety | site, data = barley,
              groups = year, layout = c(1,1), stack = TRUE,
              auto.key = list(space = "right"),
              ylab = "Barley Yield (bushels/acre)",
              scales = list(x = list(rot = 45)))

pdf("foo.pdf", onefile = TRUE)
print(foo)
dev.off()

onefile = TRUE应该是默认设置，并允许在一个 PDF 中包含多个页面。我做的另一件事是在pdf()包装器中打印条形图对象；同样，如果您以交互方式运行 R，我认为这不是必需的，但如果这是基于批处理或脚本的作业，则需要它。

于 2012-11-05T20:03:23.270 回答