R 将单位添加到文本标签
我已经创建了一个气泡图,并希望为气泡的大小提供一个标签。不过,我看不出如何在标签上加上一个单位,即不写上“228”而把标签改为“228 qq” 代码是:R 将单位添加到文本标签,r,ggplot2,label,geom-text,R,Ggplot2,Label,Geom Text,我已经创建了一个气泡图,并希望为气泡的大小提供一个标签。不过,我看不出如何在标签上加上一个单位,即不写上“228”而把标签改为“228 qq” 代码是: SalesChannells <- read.csv("SalesChannelsData.csv") View(SalesChannells) SalesChannelsScatter <- ggplot(SalesChannells, aes(x = SalesChannel, y = NumberOfFarmers, size
SalesChannells <- read.csv("SalesChannelsData.csv")
View(SalesChannells)
SalesChannelsScatter <- ggplot(SalesChannells, aes(x = SalesChannel, y = NumberOfFarmers, size = TotalVolumeOfCoffee, color = TotalVolumeOfCoffee), alpha=.5) +
geom_point()
SalesChannelsScatter +
scale_size_area(max_size = 30) +
theme(legend.position = "bottom", legend.direction = "horizontal") +
labs(size = "Volume of coffee sold") +
labs(title="More coffee is sold to intermediaries than to organisations") +
expand_limits(y=c(0,100)) +
labs(x="Sales Channel", y="Number of farmers")+
geom_text(aes(label=TotalVolumeOfCoffee), size=8, color="white",hjust = 1.7)
salechannels可能类似于:
geom_text(aes(label=paste(TotalVolumeOfCoffee, "qq")), size=8, color="white", hjust = 1.7)
(未测试)为什么不在geom_文本中替换以下标签=粘贴(TotalVolumeOffee,“qq”)
?非常感谢!我让你回答谢谢你把我的评论复制/粘贴到你的答案中。如果这是一个讽刺,你会注意到你在我输入答案时发表了评论,我希望。。。