MathGroup Archive 2007

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

Search the Archive

Re: strange bug?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg79189] Re: strange bug?
  • From: Peter Pein <petsie at dordos.net>
  • Date: Fri, 20 Jul 2007 03:35:14 -0400 (EDT)
  • References: <f7n4k9$24e$1@smc.vnet.net>

Jeremy Price schrieb:
> I think I've found a bug in mathematica 5.2,
> 
> In[418]:=
> $Version
> 
> Out[418]=
> 5.2 for Microsoft Windows (June 20, 2005)
> 
> When I run, eg, 
> 
> In[416]:= IntegerPart[10*5.1]
> 
> Out[416]= 51
> 
> I get what I expect.  But when I run the same thing in a loop, 
> 
> For[n = 1, n < 20, n = n + .1,
>   Print[n, " ", IntegerPart[10*n]]
>   ]
> 
> I get output like:
> 
>>From In[415]:= 4.2 42
> 
>>From In[415]:=4.3 43
> 
>>From In[415]:=4.4 44
> 
>>From In[415]:=4.5 45
> 
>>From In[415]:=4.6 46
> 
>>From In[415]:=4.7 47
> 
>>From In[415]:=4.8 48
> 
>>From In[415]:=4.9 48
> 
>>From In[415]:=5. 49
> 
>>From In[415]:=5.1 50
> 
>>From In[415]:=5.2 51
> 
> Any idea what's going on here or how to fix it?
> 

Hi Jeremy.

if there is a possibility to use exact numbers, do so:

Print[N[#], " ", IntegerPart[10#]] & /@ (Range[10, 199]/10);

Peter


  • Prev by Date: Re: strange bug?
  • Next by Date: Re: Embedded Style Sheets
  • Previous by thread: Re: strange bug?
  • Next by thread: Re: strange bug?