From ggrothendieck at gmail.com  Sat Jul  5 03:13:21 2008
From: ggrothendieck at gmail.com (Gabor Grothendieck)
Date: Fri, 4 Jul 2008 21:13:21 -0400
Subject: [Rd] [[ vs. .subset2
In-Reply-To: <486EC37B.9020204@pdf.com>
References: <971536df0807041712x34dafd51xc2ad8dcf0ef30b68@mail.gmail.com>
	<486EC37B.9020204@pdf.com>
Message-ID: <971536df0807041813m63e712d7q14e5e28979d0cc16@mail.gmail.com>

Not really.  The point of this is that promises seem to be
screwing up in conjunction with [[ but in light of the fact
that .subset2 works it suggests that there might be a better
implementation of [[.

Also some insight into what is really driving this problem
so one can more easily recognize it in other places would
be helpful.

This a simplification of an actual problem I had in
a large program and it took some time to track this
one down.  Also, I am not entirely happy with the
workarounds which are to use .subset2, as shown,
or force(pf) since it seems more natural to me that
it should just work out of the box.

On Fri, Jul 4, 2008 at 8:42 PM, Spencer Graves <spencer.graves at pdf.com> wrote:
> Dear Gabor:
>     Does the following answer your question:
>> tst <- list(a=1, b=2)
>> tst[numeric(0)]
> list()
>> tst[[numeric(0)]]
> Error in tst[[numeric(0)]] : attempt to select less than one element
>
>     Spencer
>
> Gabor Grothendieck wrote:
>>
>> In the code below test2() gives an error message:
>>
>>   Error in .subset2(x, i, exact = exact) :
>>     attempt to select less than one element
>>
>> even though test(), which is nearly the same, gives
>> the expected result.  BOD is a data set that comes
>> with R.   Is this a bug?
>>
>>
>> idx <- 2
>>
>> # returns expected result
>> test <- function(pf = parent.frame()) .subset2(BOD, pf$idx)
>> test()
>>
>> # gives error message !!!
>> test2 <- function(pf = parent.frame()) BOD[[pf$idx]]
>> test2()
>>
>>
>> I tried this on Windows Vista under:
>>
>>
>>>
>>> R.version.string
>>>
>>
>> [1] "R version 2.7.1 RC (2008-06-16 r45949)"
>>
>> and
>>
>>
>>>
>>> R.version.string
>>>
>>
>> [1] "R version 2.8.0 Under development (unstable) (2008-06-28 r46012)"
>>
>> ______________________________________________
>> R-devel at r-project.org mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-devel
>>
>



[Rd] [[ vs. .subset2
Gabor Grothendieck