MathGroup Archive 2011

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

Search the Archive

Re: Command for show results in live


Try

pos = {};
Monitor[Table[
  If[Not[StringFreeQ[IntegerString[n^i], "1234567"]], 
   AppendTo[pos, {n, i}], Null], {n, 200}, {i, 1000}], pos];
pos

-Francesco


  • Prev by Date: Re: Seaching in Pi a sequence. Looking for a faster method
  • Next by Date: Re: Replacement faild
  • Previous by thread: Command for show results in live
  • Next by thread: Aw: mathematica 8 and psfrag