s="1=2-1 ";for(i in!0:5)cat(s<-sub(-!i,"-(2-1)",s))