R devel - May 2009 - unsplit list of data.frames with one column

Perhaps this is the intended behavior, but I discovered that unsplit 
throws an error when it tries to set rownames of a variable that has 
no dimension.  This occurs when unsplit is passed a list of 
data.frames that have only a single column.

An example:

df <- data.frame(letters[seq(25)])
fac <- rep(seq(5), 5)
unsplit(split(df, fac), fac)

For reference, I'm using R version 2.9.0 (2009-04-17), subversion 
revision 48333, on Ubuntu 8.10.

-- 
William H. Gray, III                          Computer Systems Analyst
Biostatistics Shared Resource          Vanderbilt-Ingram Cancer Center
571 Preston Building                          Nashville, TN 37232-6848
Ph. 615.936.0563                                      Fax 615.936.2602

Will Gray wrote:
> 
> Perhaps this is the intended behavior, but I discovered that unsplit 
> throws an error when it tries to set rownames of a variable that has no 
> dimension.  This occurs when unsplit is passed a list of data.frames 
> that have only a single column.
> 
> An example:
> 
> df <- data.frame(letters[seq(25)])
> fac <- rep(seq(5), 5)
> unsplit(split(df, fac), fac)
> 
> For reference, I'm using R version 2.9.0 (2009-04-17), subversion 
> revision 48333, on Ubuntu 8.10.
> 
That's a bug. The line

         x <- value[[1L]][rep(NA, len), ]

should be

         x <- value[[1L]][rep(NA, len), , drop=FALSE]


-- 
    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