R devel - Oct 2007 - documentation bug for isoreg example (PR#10352)

Full_Name: Benjamin Tyner
Version: 2.6.0 (43063)
OS: WinXP
Submission from: (NULL) (171.161.224.10)


At the end of the examples for isoreg, there is

   cat("R^2 =", formatC(sum(residuals(ir4)^2) / (9*var(y4)),
digits=2),"\n")

I think this should be

   cat("R^2 =", formatC(1 - sum(residuals(ir4)^2) / (9*var(y4)),
digits=2),"\n"

Thanks
Ben

platform       i386-pc-mingw32             
arch           i386                        
os             mingw32                     
system         i386, mingw32               
status                                     
major          2                           
minor          6.0                         
year           2007                        
month          10                          
day            03                          
svn rev        43063                       
language       R                           
version.string R version 2.6.0 (2007-10-03)

>>>>> "BT" == Benjamin Tyner <btyner at
gmail.com>
>>>>>     on Thu, 18 Oct 2007 15:15:06 +0200 (CEST) writes:
    BT> Full_Name: Benjamin Tyner
    BT> Version: 2.6.0 (43063)
    BT> OS: WinXP
    BT> Submission from: (NULL) (171.161.224.10)


    BT> At the end of the examples for isoreg, there is

    BT> cat("R^2 =", formatC(sum(residuals(ir4)^2) / (9*var(y4)),
digits=2),"\n")

    BT> I think this should be

    BT> cat("R^2 =", formatC(1 - sum(residuals(ir4)^2) /
(9*var(y4)), digits=2),"\n"

I think so too, and I'm infinitely embarrassed because I think I
had put that example there {maybe cut & paste from somewhere,
but still...}

Martin Maechler, ETH Zurich.