The R Project SVN R

Rev

Rev 90202 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 90202 Rev 90258
Line 1... Line 1...
1
 
1
 
2
R Under development (unstable) (2026-07-01 r90200) -- "Unsuffered Consequences"
2
R Under development (unstable) (2026-07-14 r90254) -- "Unsuffered Consequences"
3
Copyright (C) 2026 The R Foundation for Statistical Computing
3
Copyright (C) 2026 The R Foundation for Statistical Computing
4
Platform: x86_64-pc-linux-gnu
4
Platform: aarch64-apple-darwin25.5.0
5
 
5
 
6
R is free software and comes with ABSOLUTELY NO WARRANTY.
6
R is free software and comes with ABSOLUTELY NO WARRANTY.
7
You are welcome to redistribute it under certain conditions.
7
You are welcome to redistribute it under certain conditions.
8
Type 'license()' or 'licence()' for distribution details.
8
Type 'license()' or 'licence()' for distribution details.
9
 
9
 
Line 194... Line 194...
194
 $ messages:List of 2
194
 $ messages:List of 2
195
  ..$ :List of 2
195
  ..$ :List of 2
196
  .. ..$ message: chr "3 NAs produced by log(.) + sqrt(.)\n"
196
  .. ..$ message: chr "3 NAs produced by log(.) + sqrt(.)\n"
197
  .. ..$ call   : language message(sprintf("%d NAs produced by log(.) + sqrt(.)", sum(is.na(r))))
197
  .. ..$ call   : language message(sprintf("%d NAs produced by log(.) + sqrt(.)", sum(is.na(r))))
198
  .. .. ..- attr(*, "srcref")= 'srcref' int [1:8] 78 5 78 87 5 87 78 78
198
  .. .. ..- attr(*, "srcref")= 'srcref' int [1:8] 78 5 78 87 5 87 78 78
199
  .. .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x55fe129f2878> 
199
  .. .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0xc3df67620> 
200
  .. ..- attr(*, "class")= chr [1:3] "simpleMessage" "message" "condition"
200
  .. ..- attr(*, "class")= chr [1:3] "simpleMessage" "message" "condition"
201
  ..$ :List of 2
201
  ..$ :List of 2
202
  .. ..$ message: chr "Got +/- Inf from x[4L]\n"
202
  .. ..$ message: chr "Got +/- Inf from x[4L]\n"
203
  .. ..$ call   : language message(sprintf("Got +/- Inf from x[%s]", deparse(which(ii))))
203
  .. ..$ call   : language message(sprintf("Got +/- Inf from x[%s]", deparse(which(ii))))
204
  .. .. ..- attr(*, "srcref")= 'srcref' int [1:8] 80 5 80 96 5 96 80 80
204
  .. .. ..- attr(*, "srcref")= 'srcref' int [1:8] 80 5 80 96 5 96 80 80
205
  .. .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0x55fe129f2878> 
205
  .. .. .. ..- attr(*, "srcfile")=Classes 'srcfilecopy', 'srcfile' <environment: 0xc3df67620> 
206
  .. ..- attr(*, "class")= chr [1:3] "simpleMessage" "message" "condition"
206
  .. ..- attr(*, "class")= chr [1:3] "simpleMessage" "message" "condition"
207
 $ warnings:List of 2
207
 $ warnings:List of 2
208
  ..$ :List of 2
208
  ..$ :List of 2
209
  .. ..$ message: chr "NaNs produced"
209
  .. ..$ message: chr "NaNs produced"
210
  .. ..$ call   : language log(-x)
210
  .. ..$ call   : language log(-x)
Line 243... Line 243...
243
> cat("\nNumber of all base objects:\t", length(ls.base),
243
> cat("\nNumber of all base objects:\t", length(ls.base),
244
+     "\nNumber of functions from these:\t", sum(base.is.f),
244
+     "\nNumber of functions from these:\t", sum(base.is.f),
245
+     "\n\t starting with 'is.' :\t  ",
245
+     "\n\t starting with 'is.' :\t  ",
246
+     sum(grepl("^is\\.", ls.base[base.is.f])), "\n", sep = "")
246
+     sum(grepl("^is\\.", ls.base[base.is.f])), "\n", sep = "")
247
 
247
 
248
Number of all base objects:	1410
248
Number of all base objects:	1411
249
Number of functions from these:	1366
249
Number of functions from these:	1367
250
	 starting with 'is.' :	  53
250
	 starting with 'is.' :	  53
251
 
251
 
252
> ## R ver.| #{is*()}
252
> ## R ver.| #{is*()}
253
> ## ------+---------
253
> ## ------+---------
254
> ## 0.14  : 31
254
> ## 0.14  : 31
Line 1637... Line 1637...
1637
sm     3    3    3    3    4    4    4    4    2     2     2
1637
sm     3    3    3    3    4    4    4    4    2     2     2
1638
 
1638
 
1639
> par(op)
1639
> par(op)
1640
> 
1640
> 
1641
> cat("Time elapsed: ", proc.time() - .ptime, "\n")
1641
> cat("Time elapsed: ", proc.time() - .ptime, "\n")
1642
Time elapsed:  1.038 0.024 1.063 0 0 
1642
Time elapsed:  0.693 0.045 0.751 0 0 
1643
> 
1643
>