R中ggplot如何更改标签多个barplots

Question

我试图改变一个多变量图的标签中ggplot 我的第一个图像是这样的：

第一张图片显示的是我有两个变量 - 数量和总毛 我有X标记的G和N（这是我在数据变量值） 我想改变的X标签更具描述

我怎么可以更新我的ggplot声明引入这些新标签

test %>% 
    group_by(DiscInd) %>% 
    summarise(Count=n(),TotalGross=sum(Gross)/100000000) %>% 
    gather(Var, Val, -DiscInd) %>% 
    ggplot(., aes(x=DiscInd, y = Val, fill=Var)) + 
     geom_bar(stat="identity", position="dodge") + 
    xlab("Year vs Released Difference") + 
    ylab("Total Gross")     + 
    ggtitle("Total Movie with Gross ") 

这可能吗？

下面是一些记录，我的数据帧测试

 DiscInd  Gross 
      N  2783918982 
      N  2207615668 
      N  1670328025 
      N  1519479547 
      G  1514019071 
      G  1404705868 

更新： 还我试图改变标签和格式标签，这样不会互相重叠。

Answer 1

比方说，你新的描述标签名称是标签摹说明和标志n说明，这是你想要的吗？

test %>% 
    group_by(DiscInd) %>% 
    summarise(Count=n(),TotalGross=sum(Gross)/100000000) %>% 
    gather(Var, Val, -DiscInd) %>% 
    ggplot(., aes(x=DiscInd, y = Val, fill=Var)) + 
    geom_bar(stat="identity", position="dodge") + 
    scale_x_discrete(labels=c("Label G Desc", "Label N Desc")) + 
    xlab("Year vs Released Difference") + 
    ylab("Total Gross")     + 
    ggtitle("Total Movie with Gross ") 

x轴的文字与角度：

test %>% 
    group_by(DiscInd) %>% 
    summarise(Count=n(),TotalGross=sum(Gross)/100000000) %>% 
    gather(Var, Val, -DiscInd) %>% 
    ggplot(., aes(x=DiscInd, y = Val, fill=Var)) + 
    geom_bar(stat="identity", position="dodge") + 
    scale_x_discrete(labels=c("Label G Desc", "Label N Desc")) + 
    xlab("Year vs Released Difference") + 
    ylab("Total Gross")     + 
    ggtitle("Total Movie with Gross ") + 
    theme(axis.text.x = element_text(angle = 60, size=15, hjust = 1))