Re: Quick help needed very much!!!!
- To: mathgroup at smc.vnet.net
- Subject: [mg94037] Re: Quick help needed very much!!!!
- From: Szabolcs Horvát <szhorvat at gmail.com>
- Date: Tue, 2 Dec 2008 05:20:56 -0500 (EST)
- Organization: University of Bergen
- References: <200811290929.EAA14420@smc.vnet.net> <200811301201.HAA07727@smc.vnet.net> <gh2h8o$icj$1@smc.vnet.net>
Raffy wrote:
> On Dec 1, 7:01 am, Artur <gra... at csl.pl> wrote:
>> Dear Mathematica Gurus,
>>
>> I was run 2 days ago procedure
>> aa = {}; bb = {}; Do[
>> If[(Sqrt[n! + 1] /. Sqrt[_] -> 1) > 1, Print[n]; AppendTo[aa, n];
>> AppendTo[bb, Sqrt[n! + 1] /. Sqrt[_] -> 1]], {n, 1, 10000000}]; aa
>>
>> Who know how interrupt these with possibility received information about
>> value last n checked or received recent value n without interrupting.
>>
>> If you know answer on my question send copy email answer also on my
>> private email, please!
>>
>> Best wishes
>> Artur
>
> Use Dynamic[] to get updates; for example:
>
> nn="Unknown";
> PrintTemporary[Dynamic[nn]];
> Do[ nn = n, {n, 1, 100} ];
>
Raffy,
This is exactly what Monitor[] does.