Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Re: Bug? ver4

  • To: mathgroup at smc.vnet.net
  • Subject: [mg104797] Re: Bug? ver4
  • From: ynb <wkfkh056 at yahoo.co.jp>
  • Date: Tue, 10 Nov 2009 05:59:58 -0500 (EST)
  • References: <hd3mss$9rv$1@smc.vnet.net>

On 11=E6=9C=887=E6=97=A5, =E5=8D=88=E5=BE=8C8:49, ynb <wkfkh... at yahoo.co.jp> wrote:
> In[26]:=
> Table[N[{Cos[Pi/k], FunctionExpand[
> =C2  =C2  =C2 Cos[Pi/k]]}], {k, 17, 21}]
>
> Out[26]=
> {{0.9829730996839018, 0.9829730996839018},
> =C2  {0.984807753012208, 0.9848077530122081 + =C2 0.*I},
> {0.9863613034027223, 1.126478970802505 + 0.375464157076925* I},
> <------Bug????
> {0.9876883405951378, =C2 0.9876883405951377},
> {0.9888308262251285, 0.9888308262251286 + 9.614813431917819*^-17*I}}

Hi,
seems to be fixed in version 7:
Table[N[{Cos[Pi/k], FunctionExpand[Cos[Pi/k]]}], {k, 17, 21}]

{{0.982973, 0.982973}, {0.984808, 0.984808}, {0.986361,
   0.986361}, {0.987688, 0.987688}, {0.988831, 0.988831}}

Daniel

<--- thanks


  • Prev by Date: Re: Bug? ver4
  • Next by Date: Re: Complex solutions to simple equations
  • Previous by thread: Re: Bug? ver4
  • Next by thread: How can I reduce the frequency of a sine wave tia sal22