x <- rnorm(1e6);

y <- log(x);  # or logb(x) or log1p(x)
w <- warnings();
print(object.size(w));
## [1] 480
str(w);
 $ NaNs produced: language log(x)
 - attr(*, "dots")= list()
 - attr(*, "class")= chr "warnings"

y <- log2(x);  # or log10(x)
w <- warnings();
print(object.size(w));
## [1] 8000536
str(w);
## List of 1
##  $ NaNs produced: language log(c(2.12082478659910,
1.40263187453398, 1.574125429
## 83486, -0.816399069824751,  0.215940065840533, 1.20975177084379,
-0.340287874362
## 813, 0.117151537611550,  ...
##  - attr(*, "dots")= list()
##  - attr(*, "class")= chr "warnings"

Note also how long it takes to display and str() the warning.

I have observed this on R v2.6.2 and R v2.7.0 (2008-02-11 r44432) on
both WinXP and Linux.

/Henrik

______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

Reply via email to