progressreport(i, n,
               every = min(100,max(1, ceiling(n/100))),
               nperline = min(charsperline,
                              every * ceiling(charsperline/(every + 3))),
               charsperline = 60,
               style=spatstat.options("progress"))n).  If style="txtbar" then txtProgressBar is
  used to represent progress as a bar made of text characters in the
  Rinterpreter window.
  If style="tty", then progress reports are printed using
  cat. This only seems to work well under Linux.
for(i in 1:40) progressreport(i, 40)Run the code above in your browser using DataLab