使用facet_grid绘制具有不同离散值的两个图形

我的第一篇文章到stackoverflow。希望我能得到一些帮助。使用facet_grid绘制具有不同离散值的两个图形

我正在查看NOAA自然事件数据库。我想显示一组图表，显示哪些财务影响是基于发生什么类型的事件（洪水，龙卷风等）。数据库将财务损失分为两类：财产损失和作物损害。我想显示两张图，显示财产和作物损失造成的总成本。有很多类别的事件（> 900），所以我只想显示每个类别（属性或作物损害）中排名前10位的贡献者，并按降序排列他们。问题是，这两个类别的顶级赛事是不同的。当我尝试使用facet_grid绘制它时，它显示了这两个类别之间的所有贡献者。

damages.graph

下面是代码：

## Melt results into usable format 
type.melt <- melt(by_event_dmg, measure.vars=c("prop","crop"), variable.name="type") 
melt.arrange <- arrange(type.melt, type, desc(value)) 
melt.arrange <- melt.arrange[c(1:10,986:995),] 
z <- ggplot(melt.arrange, aes(x= reorder(EVTYPE, -value),y = value)) 
z + geom_bar(stat='identity') + 
    facet_grid(type ~ ., scales="free") + 
    theme(axis.text.x=element_text(angle=90,hjust=1))+ 
    ggtitle("Damages from Natural Events") + 
    theme(plot.title = element_text(hjust=0.5))

来源

2017-05-25 gunga1214

使用'facet_wrap（〜型，鳞片= “免费”，nrow = 2）'。 – Axeman

实际上，如果您切换格式以在一行中显示图形，您将获得正确的类别，但第二个图形格式不正确，无法以降序显示？ – gunga1214

如果您提供可复制问题的代表性数据集，您可能会收到一些回复。 –

-1

图像的图形一行是更接近我一直在寻找的结果。只需要按降序排列作物数据。

image corrected to show only proper categories

来源

2017-05-25 17:04:43 gunga1214

使用facet_grid绘制具有不同离散值的两个图形

回答

相关问题