Remove spacing around plotting area in r

Question

When I create the following plot I get unwanted space between the plotting area and the axis (i.e. the white space between the blue box and the x axis. How can I remove this space and make the plotting area flush with the plot axes? Thanks.

xleft<-c(1,2,2.5) xright<-c(2,2.5,2.75) ybottom<-c(1,2,2.5) ytop<-c(2,2.5,2.75)  par(mar = c(15,15,2.75,2.75) + 0.1) plot(c(1,2.75),c(1,2.75),type="n",main="title",xlab="site.x",ylab="ylab") rect(xleft,ybottom,xright,ytop,col=c("blue","red","green"))  #Label position along  axes x.label.position<-(xleft+xright)/2 y.label.position<-(ybottom+ytop)/2   #Labels  x.label<-c("Long species Name1","Long species Name2","Long species Name3")  y.label<-c("Long species Name4","Long species Name5","Long species Name5")   text(par()$usr[1]-0.5,y.label.position,y.label,xpd=TRUE,adj=1)  text(y=par()$usr[3]-0.5,x=x.label.position,x.label,xpd=TRUE,adj=1,srt=90)   par(xpd=TRUE)  legend(-0.1,0,legend=c("Species A","Species B","Species C"),fill=c("blue", "red", "green")) 

UPDATE I tried the suggestion from plannapus with my actual data but can only get the y-axis to behave is there some else in this chunk of code that is adding space to the sides of the plotting area?

quartz("colour.plot") par(mar=c(15,15,4,2)+0.1)#sets margins of plotting area  #create the data plot     plot(c(0,100), c(0,100), type = "n", main = paste(x,"vs",y," -",depth),xlab=paste("Species composition in remainder ",x),ylab=paste("Species composition in remainder ",y),asp=1,xaxs="i",yaxs="i")  #Add the rectangles rect(mdf$xleft,mdf$ybottom,mdf$xright,mdf$ytop,col=mdf$colour) 

produces

Answer 1

There is an argument in function plot that handles that: xaxs (and yaxs for the y-axis). As default it is set to xaxs="r" meaning that 4% of the axis value is left on each side. To set this to 0: xaxs="i". See the xaxs section in ?par for more information.

plot(c(1,2.75),c(1,2.75),type="n",main="title",xlab="site.x",ylab="ylab", xaxs="i", yaxs="i") rect(xleft,ybottom,xright,ytop,col=c("blue","red","green")) 

Answer 2

plot(c(1,2.75),c(1,2.75),type="n",main="title",xlab="site.x",ylab="ylab",axes=F) # ann axis(1,pos=1) axis(2,pos=1) 

All axes are remove then you can add new axes to the pos you want.