R devel - Sep 2008 - Different result with different order of binding (PR#12742)

Full_Name: Kyun-Seop Bae
Version: 2.7.2
OS: MS-Windows XP SP2
Submission from: (NULL) (148.168.40.4)


# Script that I used

rm(list=objects())
objects()

WT <- 91
AGE <- 41
SCR <- 1.3

CCL1 <- (140-AGE) * WT / (72 * SCR)
CCL2 <- (140-AGE) * WT / 72 / SCR

CCL1
CCL2

identical(CCL1, CCL2)
identical(CCL1, 96.25)
identical(CCL2, 96.25)

CCL1*10 + 0.5
CCL2*10 + 0.5

floor(CCL1*10 + 0.5)
floor(CCL2*10 + 0.5)

as.integer(CCL1*10 + 0.5)
as.integer(CCL2*10 + 0.5)


# Same with multiplied WT
# Same in S-Plus Enterprise Developer Version 7.0.6 for Microsoft Windows :
2005
# But these are accurate in MS-Excel.

kyunseop.bae at gmail.com wrote:
> Full_Name: Kyun-Seop Bae
> Version: 2.7.2
> OS: MS-Windows XP SP2
> Submission from: (NULL) (148.168.40.4)
>
>   
FAQ 7.31, not a bug!
> # Script that I used
>
> rm(list=objects())
> objects()
>
> WT <- 91
> AGE <- 41
> SCR <- 1.3
>
> CCL1 <- (140-AGE) * WT / (72 * SCR)
> CCL2 <- (140-AGE) * WT / 72 / SCR
>
> CCL1
> CCL2
>
> identical(CCL1, CCL2)
> identical(CCL1, 96.25)
> identical(CCL2, 96.25)
>
> CCL1*10 + 0.5
> CCL2*10 + 0.5
>
> floor(CCL1*10 + 0.5)
> floor(CCL2*10 + 0.5)
>
> as.integer(CCL1*10 + 0.5)
> as.integer(CCL2*10 + 0.5)
>
>
> # Same with multiplied WT
> # Same in S-Plus Enterprise Developer Version 7.0.6 for Microsoft Windows :
> 2005
> # But these are accurate in MS-Excel.
>
>   
Excel is not th gold standard for scientific computing!!
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel
>   

-- 
   O__  ---- Peter Dalgaard             ?ster Farimagsgade 5, Entr.B
  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
 (*) \(*) -- University of Copenhagen   Denmark      Ph:  (+45) 35327918
~~~~~~~~~~ - (p.dalgaard at biostat.ku.dk)              FAX: (+45) 35327907