Re: [R] "[[" gotcha

From: Prof Brian Ripley <ripley_at_stats.ox.ac.uk>
Date: Tue 16 Jan 2007 - 11:11:36 GMT

On Tue, 16 Jan 2007, Robin Hankin wrote:

> The following gotcha caught me off-guard just now.

Checking the relevant help page is always a good idea (and that is why the posting guide asks that you do so before posting).

> I have two matrices, a and b:
>
>
> a <- matrix(1,3,3)
> b <- matrix(1,1,1)
>
> (note that both "a" and "b" are matrices).
>
> I want them in a list:
>
> > B <- NULL

So why did you not create a list, e.g. by list() or vector("list", 2)?

> > B[[1]] <- a
> > B[[2]] <- b
> > B
> [[1]]
> [,1] [,2] [,3]
> [1,] 1 1 1
> [2,] 1 1 1
> [3,] 1 1 1
>
> [[2]]
> [,1]
> [1,] 1
>
> >
>
> This is fine.
>
> But swapping "a" and "b" over does not behave as desired:
>
>
> > B <- NULL
> > B[[1]] <- b
> > B[[2]] <- a
> Error in B[[2]] <- a : more elements supplied than there are to replace
> >
>
>
>
> The error is given because after B[[1]] <- a, the variable B is
> just a scalar and
> not a matrix (why is this?)

You said wanted a list, and got a numeric vector (R has no scalars). In your first example you got a length-one list, not a matrix.

The type-promotion rules for [<- and [[<- are complex, and you should not rely on knowing what they currently are (they do change from time to time). But this one is right there on the help page (?"[["):

      When '$<-' is applied to a 'NULL' 'x', it first coerces 'x' to
      'list()'.  This is what also happens with '[[<-' if the
      replacement value 'value' is of length greater than one: if
      'value' has length 1 or 0, 'x' is first coerced to a zero-length
      vector of the type of 'value'.

> What's the bulletproof method for assigning matrices to a list (whose
> length is not known at runtime)?

Start with a list.

-- 
Brian D. Ripley,                  ripley@stats.ox.ac.uk
Professor of Applied Statistics,  http://www.stats.ox.ac.uk/~ripley/
University of Oxford,             Tel:  +44 1865 272861 (self)
1 South Parks Road,                     +44 1865 272866 (PA)
Oxford OX1 3TG, UK                Fax:  +44 1865 272595

______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
Received on Tue Jan 16 22:37:38 2007

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.1.8, at Tue 16 Jan 2007 - 12:30:27 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.