From Dietrich.Trenkler at uni-osnabrueck.de  Fri May  4 16:13:16 2007
From: Dietrich.Trenkler at uni-osnabrueck.de (Dietrich.Trenkler at uni-osnabrueck.de)
Date: Fri,  4 May 2007 16:13:16 +0200 (CEST)
Subject: [Rd] Bug in qr.R ? (PR#9655)
Message-ID: <20070504141316.A055862635@slim.kubism.ku.dk>

Ladies and Gentlemen,

using

 > A <- structure(c(1, 0, 0, 3, 2, 1, 4, 5, -3, -2, 1, 0), .Dim = 
as.integer(c(3,4)))

I get

 > dim(A)
[1] 3 4

 >  qr.R(qr(A),complete=TRUE)
     [,1]      [,2]      [,3]       [,4]
[1,]   -1 -3.000000 -4.000000  2.0000000
[2,]    0 -2.236068 -3.130495 -0.8944272
[3,]    0  0.000000 -4.919350 -0.4472136
 >  qr.R(qr(A),complete=FALSE)
     [,1]      [,2]      [,3]       [,4]
[1,]   -1 -3.000000 -4.000000  2.0000000
[2,]    0 -2.236068 -3.130495 -0.8944272
[3,]    0  0.000000 -4.919350 -0.4472136

In ?qr.R I find

/qr.R returns R. The number of rows of R is nrow(X) or ncol(X), 
depending on whether complete is TRUE or FALSE./

As you can see, the number of rows stays the same...
 
Thank you.

D. Trenkler

--please do not edit the information below--

Version:
 platform = i386-pc-mingw32
 arch = i386
 os = mingw32
 system = i386, mingw32
 status =
 major = 2
 minor = 5.0
 year = 2007
 month = 04
 day = 23
 svn rev = 41293
 language = R
 version.string = R version 2.5.0 (2007-04-23)

Windows XP (build 2600) Service Pack 2.0

Locale:
LC_COLLATE=English_United States.1252;LC_CTYPE=English_United 
States.1252;LC_MONETARY=English_United 
States.1252;LC_NUMERIC=C;LC_TIME=English_United States.1252

Search Path:
 .GlobalEnv, package:stats, package:graphics, package:grDevices, 
package:utils, package:datasets, package:methods, Autoloads, package:base

-- 
Dietrich Trenkler c/o Universitaet Osnabrueck 
Rolandstr. 8; D-49069 Osnabrueck, Germany    
email: Dietrich.Trenkler at Uni-Osnabrueck.de



[Rd] Bug in qr.R ? (PR#9655)
Dietrich.Trenkler at uni-osnabrueck.de