# 先赋值原始图表 用于下面的text函数对应输出图表
weizhi<-barplot(m,main = '呵呵呵呵',xlab='年份',ylab='数据',col=colors,,names.arg = y,beside= TRUE,ylim = c(0,16))
#命名图表名
png(filename = '啊哈哈2.png')
#输出图表
barplot(m,                                    #data llai来源于矩阵m
        main = '呵呵呵呵',                    #标题名
        xlab='年份',                          #x轴坐标名
        ylab='数据',                          #y轴坐标名
        col=colors,                           #颜色来源于向量colors
        names.arg = y,                        #每组数据名来自向量y
        beside= TRUE,                         #是否堆叠
        ylim = c(0,18),                       #y轴坐标范围0-18 ,当ylim=c()时系统自动调整  
        xlim = c(0,35),                       #x轴坐标分为0-35（默认一条形为1单位，间距1单位）,当xlim = c()时系统自动调整
        cex.axis = 1.5,                       #y坐标轴标尺数值字体大小为1.5倍大小（默认为1倍）（0,5,10,15）
        border='red',                         #条形边框为红色‘red’ 默认为黑色
        cex.names = 1.1 ,                     #x轴坐标轴分组字体大小位1.1倍（默认1倍）（2012年，2013年...）
        axis.lty = 1,                         #x轴刻度调整（默认为0，默认情况下，该轴不会被绘制）用于分类轴的轴和刻度线（默认水平）
        offset = 0 ,                          #条形图向上下方向移动0单位，负数向下移动，正数向上移动              
        legend.text = c(regions),             #简单的设置图例（颜色对应的名称）
        args.legend=                          #详细设置图例 如下
          list(x=35,y=17,      #设置图例左上角起始位置坐标（35,17）
               bty="n",        #设置图例边框（'y'为有边框，'n'为无边框，默认为'y'）
               horiz=F,        #设置图例参数的方向(逻辑符 FALSE或F 为竖向  TRUE或T 为横向，默认竖向）
               cex=0.6         #设置图例大小为 0.6 倍，默认1倍
               )
        )
# text 函数为外加在原图表函数的参数图表
text(x=weizhi,y=m+0.5,              #设置数据位置坐标x=weizhi+0(表示左右偏移为0),y=m+0.5（向上移动0.5的y标尺单位）
     labels = ff3,                  #设置数据源为ff3（ff3矩阵行列必须和矩阵m一致）
     cex=0.8,                       #数据大小为0.8倍（默认1倍）
     srt = 45,                      #数据逆旋45度
     col='red'                      #数据颜色为红色“red”
     )

解决了，谢谢

day %>%
  ggplot(aes(x = date, y = total,group=1)) +
  geom_line(lty=1,col="red",cex=0.8) +geom_point(pch=16,cex=0.8,col="blue")+
  theme_tq() +
  labs(title = "销售额随时间的变化")


我画出来的图，横轴是日期，日期太多了，都挤在了一起，请问怎么把横轴改一下？

你这种情况是X轴的标题太大了 可以改变字体的大小（用cex.names=0.5, 这个是x轴坐标轴分组字体大小为0.5倍），也可以用 参数 las=3​     # 3 竖坐标横坐标都名都是竖向显示，0为都横向显示，1 竖坐标竖向显示横坐标横向显示， 2  竖坐标横向显示横坐标竖向显示
自己试试   我ggplot还在学习中 不知道加哪里合适