Re: Pretty output

• To: mathgroup at smc.vnet.net
• Subject: [mg35172] Re: Pretty output
• From: Peter Pein <petsie at arcor.de>
• Date: Fri, 28 Jun 2002 02:31:01 -0400 (EDT)
• Organization: Arcor
• References: <afbih4\$54r\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Robert G. Wilson v wrote:
>
> I put in the following Mathematica code: Do[s = Sum[x^i, {i, 0, 2^n}];
> Print[ ToString[ Factor[ s, Modulus -> 2]]], {n, 1, 10}]
>
> The output was fairly straight forward until n=6 and beyond. What I am
> seeing is:
>
> "          2    3    4        4    5    6    7    8    12        2
> 5    6    7    10    12        2    3    4    6    8    9   \
>  10    12            3    5    6    7    9    11    12            2
> 3    4    5    6    7    8    9    10    11    12\n(1 + x \
> + x  + x  + x ) (1 + x  + x  + x  + x  + x  + x  ) (1 + x  + x  + x  +
> x  + x   + x  ) (1 + x  + x  + x  + x  + x  + x  + x   + x \
>  ) (1 + x + x  + x  + x  + x  + x  + x   + x  ) (1 + x + x  + x  + x  +
> x  + x  + x  + x  + x  + x   + x   + x  )"
>
> What is the deal here?
>
> Also what is the easiest way to count the number of factors?
>
> Thank you for any assistance in advance.
>
> Sincerely yours,
>
> Robert G. Wilson, V
>

Hi Robert,
if you have to use ToString (#%&\$'%§\$!!), then try:

Do[s = Sum[x^i, {i, 0, 2^n}];
Print[ToString[Factor[s, Modulus -> 2], PageWidth -> 80]],
{n, 1, 10}]

or a PageWidth suitable for your needs.

Peter

```

• Prev by Date: Re: Assigning to a sublist
• Next by Date: Inverse/LaplaceTransform inconsistency?
• Previous by thread: Re: Pretty output
• Next by thread: help on backtesting