Полный заголовок для графического изображения окна
Из того, что я знаю, это вполне сложно, и действительно зависит от языка - многочисленные языки поступают по-своему тестирования GUI, но если действительно необходимо протестировать GUI (в противоположность model/gui взаимодействию), часто необходимо моделировать фактическое пользовательское нажатие кнопки. Например, платформа SWT, используемая в Eclipse, обеспечивает SWTBot, , JFCUnit был уже упомянут, Mozilla поступает по-своему моделирования этого в XUL (и от того, что я считал на их блогах, эти тесты, кажется, являются довольно хрупкими).
Иногда необходимо сделать снимок экрана и тест для идеального для пикселя рендеринга (я полагаю, что Mozilla делает это для проверки на правильно представленные страницы) - это требует более длительной установки, но могло бы быть тем, в чем Вы нуждаетесь для графиков. Тот путь при обновлении кода и теста повреждается, необходимо вручную проверить изображение, если бы отказ был реален, или Вы улучшили код рендеринга графика для генерации более симпатичных графиков и потребности обновить снимки экрана.
2 ответа
Наиболее очевидные методы, которые приходят мне в голову, - это использование Lattice или ggplot2. Вот пример использования решетки:
library(lattice)
depthgroup<-equal.count(quakes$depth, number=3, overlap=0)
magnitude<-equal.count(quakes$mag, number=2, overlap=0)
xyplot(lat ~ long | depthgroup*magnitude,
data=quakes,
main="Fiji Earthquakes",
ylab="latitude", xlab="longitude",
pch=".",
scales=list(x=list(alternating=c(1,1,1))),
between=list(y=1),
par.strip.text=list(cex=0.7),
par.settings=list(axis.text=list(cex=0.7)))
В решетке вы должны изменить параметр main =.
Приведенный выше пример был взят из здесь .
У меня нет хорошего примера ggplot2, но есть множество примеров с ggpolot2 в блоге learn r .
Одним из вариантов может быть этот пример , где используются ggplot2 и
opts (title = "RSS and NINO3.4 Temperature Anomalies \nand SATO Index Trends Since 1980")
Но вам, естественно, нужно создать все три графика в gg2plot.
Я думаю, вам подойдет любая решетка или ggplot2.
Используя традиционную графическую систему, можно двумя способами:
(1)
par(mfrow=c(2,2))
for( i in 1:4 ) plot(1:10)
mtext("Title",side=3,outer=TRUE,padj=3)
(2)
par(mfrow=c(2,2))
for( i in 1:4 ) plot(1:10)
par(mfrow=c(1,1),mar=rep(0,4),oma=rep(0,4))
plot.window(0:1,0:1)
text(.5,.98,"Title")