geom_text仅在堆积条形图的顶部

geom_text仅在堆积条形图的顶部,第1张

概述我想在我的堆积条形图的顶部有标签. 这是我的数据框: #create data frame building <- c("Burj \nKhalifa", "Zifeng \nTower", "Bank of \nAmerica Tower", "Burj Al Arab", "Emirates \nTower One", "New York \nTimes Tow 我想在我的堆积条形图的顶部有标签.

这是我的数据框:

#create data frame building <- c("Burj \nKhalifa","Zifeng \nTower","Bank of \namerica Tower","Burj Al arab","Emirates \nTower One","New York \nTimes Tower","Emirates \nTower Two","Rose Rayhaan \nby Rotana","The \nPinnacle","Minsheng \nBank Building")occupiable<- c(585,317,235,198,241,220,213,237,265,237)nonoccupiable <- c(244,133,131,124,113,99,97,96,95,94)df.build <- data.frame(building,occupiable,nonoccupiable)#melt data frame for stack bar plotdf.build2 <- melt(df.build,ID.vars="building")

我的堆积条形图:

#comparision true and percived valuesggplot(df.build2,aes(x=reorder(building,-value),y=value,fill=variable)) +  geom_bar(stat="IDentity") +  xlab("") +  ylab("") + #geom_text(aes(label = c("29%" "30%","36%","39%","32%","31%","29%","28%")),size = 3,hjust = 0.5,vjust = 3,position = "stack") +  theme(legend.position="top") +  ggtitle("PorównanIE wartości prawdziwych i odczuwalnych")

我希望在我的代码中使用geom_text()中的标签进行绘图(蓝条高度/整条高度).它应该放在蓝色区域.我该怎么做?

解决方法 另一种解决方案(我也改变了x轴文字的角度):

# creating percentage variablesdf.build$occ.perc <- round(df.build$occupiable / (df.build$occupiable + df.build$nonoccupiable) * 100)df.build$nonocc.perc <- round(df.build$nonoccupiable / (df.build$occupiable + df.build$nonoccupiable) * 100)# melt data frame for stack bar plot![enter image description here][1]df.build2 <- cbind(  melt(df.build,ID = c("building"),measure = c(2:3)),melt(df.build,measure = c(4:5),value.name = "perc"))df.build2 <- df.build2[,-c(4,5)]df.build2$perc <- ifelse(df.build2$variable=="occupiable",df.build2$perc==NA,df.build2$perc)# creating the plotggplot(df.build2,fill=variable)) +  geom_bar(stat="IDentity") +  xlab("") +  ylab("") +  geom_text(aes(label = perc),vjust = 2,position = "stack") +  theme(legend.position="top",axis.text.x = element_text(angle = 45,vjust=0.5)) +  ggtitle("PorównanIE wartości prawdziwych i odczuwalnych")

结果:

总结

以上是内存溢出为你收集整理的geom_text仅在堆积条形图的顶部全部内容,希望文章能够帮你解决geom_text仅在堆积条形图的顶部所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。

欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/web/1043615.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-05-24
下一篇 2022-05-24

发表评论

登录后才能评论

评论列表(0条)

保存