茱莉亚图与ggplot的填充等效

问题描述

你好，我现在使用Plots.jl和StatPlots将R ggplot代码解释为Julia。

R"library(ggplot2)"
R"library(gcookbook)"
R"library(dplyr)"
R"upc <- uspopchange %>% arrange(desc(Change)) %>% slice(1:10)"    
R"ggplot(upc,aes(x = Abb,y = Change,fill = Region)) +
    geom_col()"

这就是我想要做的。

我尝试通过StatsPlots使用groupedbar

upc = rcopy(R"upc")
groupedbar(upc.Abb,upc.Change,group =(upc.Region),xlabel = "State",ylabel = "Change",bar_width = 0.5,size = (450,300))

但是结果对我来说似乎很奇怪。

有人可以帮助我吗？请让我知道任何参考。非常感谢。

解决方法

有一个名为Gadfly的软件包，主要基于Hadley Wickhams的ggplot2。并且，它完全用朱莉娅写成。您可以尝试使用此代码来绘制类似内容。

using Gadfly
upc = rcopy(R"upc")
sort!(upc,[:Abb]) #Sort it by Abb to show in plot

palette=["red","blue"] #Colors for bars
plot(upc,x = :Abb,y = :Change,color = :Region,Geom.bar,Theme(bar_spacing=1mm),Scale.color_discrete_manual(palette...))

bar-chart ggplot2 julia