Re: [Rd] strange error with rw2010dev

From: Thomas Lumley <tlumley_at_u.washington.edu>
Date: Tue 29 Mar 2005 - 01:34:57 GMT

On Mon, 28 Mar 2005, Kjetil Brinchmann Halvorsen wrote:

>> testmat <- matrix(1:80, 20,4)
>> dim(testmat)
> [1] 20 4
>> str(testmat)
> int [1:20, 1:4] 1 2 3 4 5 6 7 8 9 10 ...
>> testframe <- data.frame(testmat=I(testmat),
> x=rnorm(20), y=rnorm(20), z=sample(1:20))
>> str(testframe)
> `data.frame': 20 obs. of 4 variables:
> $ testmat: int [1:20, 1:4] 1 2 3 4 5 6 7 8 9 10 ...
> ..- attr(*, "class")= chr "AsIs"
> $ x : num 0.768 -0.462 0.450 0.476 -1.077 ...
> $ y : num 0.453 1.227 -1.514 -0.904 -0.129 ...
> $ z : int 10 4 15 19 14 3 9 17 18 5 ...
>> summary(testframe)
> Error: protect(): protection stack overflow
>

Yes, you're getting infinite recursion.

summary.data.frame calls summary.matrix to handle the first column, and this then calls summary.data.frame on data.frame(testframe[[1]]), but
> str(data.frame(testframe[[1]]))

`data.frame': 20 obs. of 1 variable:
  $ testframe..1..: int [1:20, 1:4] 1 2 3 4 5 6 7 8 9 10 ...    ..- attr(*, "class")= chr "AsIs"

so round and round we go. Perhaps summary.matrix should do something to remove the AsIs attribute?

         -thomas



R-devel@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel Received on Tue Mar 29 11:37:17 2005

This archive was generated by hypermail 2.1.8 : Mon 24 Oct 2005 - 22:26:32 GMT