R语言ggplot2如何让图像占据整个背景板

Question

问题遇到的现象和发生背景

我用ggplot画图，获得的图片有坐标轴和灰色背景，如下图所示。因为特殊要求，我不需要任何的背景，希望输出自动保存的图片能够占据整个绘图面，没有背景

问题相关代码，请勿粘贴截图

#这是我原来的代码
  Contour<-ggplot(map,aes(x=Var1,y=Var2,z=value))+
    geom_tile(aes(fill=value))+#鏍规嵁楂樺害濉厖
    scale_fill_gradientn(limits=c(0,zmax),colours=colormap,name = "Energy density/(J/"~cm^-3~")")+
    #geom_contour(aes(colour= ..level..),breaks=breaks_lines,color="black")+#
    labs(x="x/(cm)",y="y/(cm)",fill="Z-Value")+
    xlim(-0.45,0.45)+ylim(-0.3,0.3)+
    # scale_x_continuous(limits=c(-0.45,0.45), breaks=seq(-0.4,0.4,0.05))+
    # scale_x_continuous(limits=c(-0.3,0.3), breaks=seq(-0.25,0.25,0.5))+
    #scale_x_continuous(breaks=seq(0.1))+
    #scale_y_continuous(breaks=seq(0.1))+
    theme(
      axis.title=element_text(size=15,face="plain",color="black"),
      axis.text = element_text(size=13,face="plain",color="black"),
      legend.title=element_text(size=13,face="plain",color="white"),
      legend.text = element_text(size=11,face="plain",color="white"),
      legend.background = element_blank(),
      legend.position =c(0.2,0.21)
    )
  filename = paste0(depth, "_", ".jpg")
  ggsave(filename,Contour,width = 12, height = 8, dpi = 600)

运行结果及报错内容

见截图

我的解答思路和尝试过的方法

我试着修改theme如下：

  Contour<-ggplot(map,aes(x=Var1,y=Var2,z=value))+
    geom_tile(aes(fill=value))+#鏍规嵁楂樺害濉厖
    scale_fill_gradientn(limits=c(0,zmax),colours=colormap,name = "Energy density/(J/"~cm^-3~")")+
    #geom_contour(aes(colour= ..level..),breaks=breaks_lines,color="black")+#
    labs(x="x/(cm)",y="y/(cm)",fill="Z-Value")+
    xlim(-0.45,0.45)+ylim(-0.3,0.3)+
    # scale_x_continuous(limits=c(-0.45,0.45), breaks=seq(-0.4,0.4,0.05))+
    # scale_x_continuous(limits=c(-0.3,0.3), breaks=seq(-0.25,0.25,0.5))+
    #scale_x_continuous(breaks=seq(0.1))+
    #scale_y_continuous(breaks=seq(0.1))+
    theme(
      axis.line=element_blank(),axis.text.x=element_blank(), 
      axis.text.y=element_blank(),axis.ticks=element_blank(), 
      axis.title.x=element_blank(), 
      axis.title.y=element_blank(),
      #axis.title=element_text(size=15,face="plain",color="black"),
      #axis.text = element_text(size=13,face="plain",color="black"),
      legend.title=element_text(size=13,face="plain",color="white"),
      legend.text = element_text(size=11,face="plain",color="white"),
      legend.background = element_blank(),
      legend.position ="none",
      panel.background=element_blank(),panel.border=element_blank(),panel.grid.major=element_blank(), 
      panel.grid.minor=element_blank(),plot.background=element_blank()
    )
  filename = paste0(depth, "_","none" ,".jpg")
  ggsave(filename,Contour,width = 12, height = 8, dpi = 600)

但输出图片有个白边如下

我想要达到的结果

彻底去掉这个白边

Answer 1

你好，我是有问必答小助手，非常抱歉，本次您提出的有问必答问题，技术专家团超时未为您做出解答


本次提问扣除的有问必答次数，已经为您补发到账户，我们后续会持续优化，扩大我们的服务范围，为您带来更好地服务。