绘制12个月期间的两个子变量-R

绘制12个月期间的两个子变量-R,r,ggplot2,R,Ggplot2,该表显示了第一行,其中有12个月的名字和访客值,葡萄牙人(葡萄牙)和外国人(埃斯特拉杰罗)(忽略没有名字的行) 如何在ggplot2中绘制一个条形图,显示12个月期间的葡萄牙游客和外国游客?通常,提供一些可复制的代码示例比提交屏幕截图更好,例如,请参见: 要完成您想要做的事情,您必须稍微更改一下格式。给定一个看起来像您的数据帧,并使用重塑2: df <- data.frame(month=factor(c("Jan","Feb","Mar"),labels=c("Jan","Feb","

该表显示了第一行,其中有12个月的名字和访客值,葡萄牙人(葡萄牙)和外国人(埃斯特拉杰罗)(忽略没有名字的行)


如何在ggplot2中绘制一个条形图,显示12个月期间的葡萄牙游客和外国游客?

通常,提供一些可复制的代码示例比提交屏幕截图更好,例如,请参见:

要完成您想要做的事情,您必须稍微更改一下格式。给定一个看起来像您的数据帧,并使用
重塑2

df <- data.frame(month=factor(c("Jan","Feb","Mar"),labels=c("Jan","Feb","Mar"),ordered=TRUE),
                 portugal=c(4000,2330,3000),
                 foreigner=c(4999,2600,3244),
                 stringsAsFactors = FALSE)


library(reshape2)
plotdf<-melt(df)
colnames(plotdf)<-c("Month","Country","Visitors")
levels(plotdf$Country)<-c("Portgual","Foreigners")

ggplot(plotdf,aes(x=Month,y=Visitors,fill=Country)) + 
  geom_bar(stat="identity",position=position_dodge()) +
  xlab("Month") +
  ylab("Visitors")
df