plot(c(-1,22),c(-1,32),type="n",xlab="",ylab="",asp=1/2)
for(C in 1:30) for(R in 1:20) if((R+C)/10==floor(R+C)/10) text(R,C,"#")