Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2001

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: printing in mathematica

  • To: mathgroup at
  • Subject: [mg31707] Re: printing in mathematica
  • From: "Steve Luttrell" <luttrell at>
  • Date: Tue, 27 Nov 2001 02:48:04 -0500 (EST)
  • Approved: Steven M. Christensen <>, Moderator
  • References: <9tlc88$ph7$>
  • Sender: owner-wri-mathgroup at

"Mike" <kodanguk at> wrote in message
news:9tlc88$ph7$1 at
> I have writting a function that goes through several thousand iterations
> takes some time to evaluate.  What i would like to do is for it to tell me
> what iteration it is on at any given moment in time - if i use print[ ]
> this then i end up with a huge list of numbers.
> Is there anyway to output a number to a cell and then to overwrite it with
> another number later?

You can use this useful routine that was posted to this newsgroup a while
ago (by Theodore Gray):

ShowStatus[status_] := LinkWrite[$ParentLink,
SetNotebookStatusLine[FrontEnd`EvaluationNotebook[], ToString[status]]]

Here is an example of how to use it:

Table[If[Mod[i, 10] == 0, ShowStatus[i]]; {i, Zeta[i]},  {i, 500}];

Steve Luttrell
Malvern Technology Centre

  • Prev by Date: Re: printing in mathematica
  • Next by Date: Re: Linux Font Problem
  • Previous by thread: Re: printing in mathematica
  • Next by thread: Re: printing in mathematica