Re: Exact real parts
- To: mathgroup at smc.vnet.net
- Subject: [mg31226] Re: Exact real parts
- From: bghiggins at ucdavis.edu (Brian Higgins)
- Date: Fri, 19 Oct 2001 03:12:31 -0400 (EDT)
- References: <9qjjv7$j8i$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Mark, Try this,
h = Table[1/(i + j - 1), {i,3}, {j,3}];
p=Eigenvalues[h];
Map[ComplexExpand[#] &, p]
Cheers,
Brian
"DIAMOND Mark R." <dot at dot.dot> wrote in message news:<9qjjv7$j8i$1 at smc.vnet.net>...
> Is it possible to get Mathematica to provide the exact real parts of
> something like the 3x3 Hilbert matrix?
>
> h = Table[1/(i + j - 1), {i, 3}, {j, 3}];
> Eigenvalues[h]
>
> N and Chop will obviously give their approximations.
>
> Cheers