Пиво Rapache генерирует темные графики

Наконец-то я разобрался с напитком rapahce. Он работает без него, но когда я загружаю файл http:localhost/test.brew, мой браузер отображает темный квадрат. Когда я смотрю на файл в локации, он там.

Кто-нибудь видел это?

это содержимое файла test.brew:

<%

library(reshape2)
library(ggplot2)
library(Cairo)

x <- data.frame(read.table("/R/output/output.txt", sep=",", header=T))
y <- melt(x, id=c("Hostname", "Date", "MetricType"))
y$value <-as.numeric(y$value)
yy <- dcast(y, Hostname + Date + variable ~ MetricType, fun.aggregate=mean)
yy$variable <- as.integer(gsub('Hour', '', yy$variable))
yy$variable <- paste(yy$variable, ":00:00", sep='')
yy$Date <- as.Date(yy$Date, format='%m/%d/%Y')
yy$Date <- paste(yy$Date, yy$variable)
db1 <- subset(yy, yy$Hostname=="server1")
db1<-data.frame(db1)
db1$Date <-as.POSIXct(db1$Date, "%Y-%m-%d %H:%M:%S", tz="EST")

filename <- paste(tempfile(tmpdir='/usr/local/apache2/htdocs'), '.png', sep='')
CairoPNG(filename)
qplot(Date, CPUAVG, data=db1, geom=c("line", "smooth"), method = "lm", ylab="AVG CPU", xlab="Date", main="Server1")
dev.off()


%>
<img src="<%=gsub('/usr/local/apache2/htdocs', '', filename)%>"/>                                   
</body>
</html>

person george willy    schedule 08.03.2012    source источник
comment
На эти вопросы лучше всего ответить в группе rapache google. Спроси там.   -  person Seth    schedule 09.03.2012


Ответы (1)


Если у кого-то есть такой же вопрос, вот ответ:

print(qplot(Date, CPUAVG, data=db1, geom=c("line", "smooth"), method = "lm", ylab="AVG CPU", xlab="Date", main="Server1"))

qplot должен быть обернут печатью.

person george willy    schedule 09.03.2012
comment
Это часто встречается в самых разных ситуациях и применимо и к решетке. На самом деле так часто, что это Часто задаваемые вопросы. - person joran; 09.03.2012