问题描述
我是 R 新手,有点迷茫。
jpg <- (
xyplot(
USD + EUR ~ data,data = ret,type = "l",ylab = "GBP",xlab = "month",key = list(space = "right",columns = 1,text = list(c("EUR","USD")),rectangles = list(col = c("pink","green")),cex = 0.7))
)
x11()
print(jpg)
感谢它,我可以在新窗口中自动打开我的情节。 我想对这段代码做同样的事情:
levels(factor(mtcars$cyl))
levels(factor(mtcars$gear))
ggplot(mtcars,aes(factor(cyl),mpg)) +
geom_Boxplot() +
transition_states(
gear,transition_length = 2,state_length = 1
) +
enter_fade() +
exit_shrink() +
ease_aes('sine-in-out') +
labs(title = 'Fuel consumption for {closest_state} gears',x = 'cyl')
anim_save("mtcars.gif")
,但我不知道如何。我如何使用 x11() 做到这一点?
解决方法
在 R 中,您可以使用“
在第一行中,他们使用“jpg
我不确定你的“anim_save("mtcars.gif")”是干什么用的,但对于上面的几行,你可以试试:
levels(factor(mtcars$cyl))
levels(factor(mtcars$gear))
CARPLOT <- ggplot(mtcars,aes(factor(cyl),mpg)) +
geom_boxplot() +
transition_states(
gear,transition_length = 2,state_length = 1
) +
enter_fade() +
exit_shrink() +
ease_aes('sine-in-out') +
labs(title = 'Fuel consumption for {closest_state} gears',x = 'cyl')
print (CARPLOT)
对于 .gif,您还可以将其分配给一个对象以对其进行可视化。