The R Project SVN R

Rev

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

Rev 85145 Rev 85424
Line 1... Line 1...
1
 
1
 
2
R Under development (unstable) (2023-07-11 r84677) -- "Unsuffered Consequences"
2
R Under development (unstable) (2023-10-13 r85327) -- "Unsuffered Consequences"
3
Copyright (C) 2023 The R Foundation for Statistical Computing
3
Copyright (C) 2023 The R Foundation for Statistical Computing
4
Platform: aarch64-apple-darwin22.5.0
4
Platform: x86_64-pc-linux-gnu
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 202... Line 202...
202
+     doi = "10.1111/j.2517-6161.1964.tb00553.x"))
202
+     doi = "10.1111/j.2517-6161.1964.tb00553.x"))
203
> 
203
> 
204
> bibstyle("unsorted", sortKeys = function(refs) seq_along(refs),
204
> bibstyle("unsorted", sortKeys = function(refs) seq_along(refs),
205
+     fmtPrefix = function(paper) paste0("[", paper$.index, "]"),
205
+     fmtPrefix = function(paper) paste0("[", paper$.index, "]"),
206
+        .init = TRUE)
206
+        .init = TRUE)
207
<environment: 0x126cbf4f8>
207
<environment: 0x119d11bf0>
208
> print(refs, .bibstyle = "unsorted")
208
> print(refs, .bibstyle = "unsorted")
209
[1] R Core Team (2013). _R: A Language and Environment for Statistical
209
[1] R Core Team (2013). _R: A Language and Environment for Statistical
210
Computing_. R Foundation for Statistical Computing, Vienna, Austria.
210
Computing_. R Foundation for Statistical Computing, Vienna, Austria.
211
<https://www.R-project.org>.
211
<https://www.R-project.org>.
212
 
212
 
Line 574... Line 574...
574
> ##D "\\documentclass{article}",
574
> ##D "\\documentclass{article}",
575
> ##D "\\usepackage[T1]{fontenc}",
575
> ##D "\\usepackage[T1]{fontenc}",
576
> ##D "\\usepackage{Rd}",
576
> ##D "\\usepackage{Rd}",
577
> ##D "\\begin{document}",
577
> ##D "\\begin{document}",
578
> ##D "\\HeaderA{test}{}{test}",
578
> ##D "\\HeaderA{test}{}{test}",
579
> ##D "\\begin{Details}\relax",
579
> ##D "\\begin{Details}\\relax",
580
> ##D "\\Tabular{cccccccccccccccc}{")
580
> ##D "\\Tabular{cccccccccccccccc}{")
581
> ##D trailer <- c("}", "\\end{Details}", "\\end{document}")
581
> ##D trailer <- c("}", "\\end{Details}", "\\end{document}")
582
> ##D writeLines(header, con)
582
> ##D writeLines(header, con)
583
> ##D writeLines(paste0(xx, "\\"), con)
583
> ##D writeLines(paste0(xx, "\\\\"), con)
584
> ##D writeLines(trailer, con)
584
> ##D writeLines(trailer, con)
585
> ##D close(con)
585
> ##D close(con)
586
> ##D ## and some UTF_8 chars
586
> ##D ## and some UTF_8 chars
587
> ##D x <- intToUtf8(as.integer(
587
> ##D x <- intToUtf8(as.integer(
588
> ##D     c(160:383,0x0192,0x02C6,0x02C7,0x02CA,0x02D8,
588
> ##D     c(160:383,0x0192,0x02C6,0x02C7,0x02CA,0x02D8,
Line 593... Line 593...
593
> ##D xx <- x
593
> ##D xx <- x
594
> ##D xx[] <- encoded_text_to_latex(x, "UTF-8")
594
> ##D xx[] <- encoded_text_to_latex(x, "UTF-8")
595
> ##D xx <- apply(xx, 1, paste, collapse = "&")
595
> ##D xx <- apply(xx, 1, paste, collapse = "&")
596
> ##D con <- file("test-utf8.tex", "w")
596
> ##D con <- file("test-utf8.tex", "w")
597
> ##D writeLines(header, con)
597
> ##D writeLines(header, con)
598
> ##D writeLines(paste(xx, "\\", sep = ""), con)
598
> ##D writeLines(paste(xx, "\\\\", sep = ""), con)
599
> ##D writeLines(trailer, con)
599
> ##D writeLines(trailer, con)
600
> ##D close(con)
600
> ##D close(con)
601
> ## End(Not run)
601
> ## End(Not run)
602
> 
602
> 
603
> 
603
> 
Line 863... Line 863...
863
+ "   OK again.",
863
+ "   OK again.",
864
+ "}")
864
+ "}")
865
> f <- tempfile()
865
> f <- tempfile()
866
> cat(out, file = f, sep = "\n")
866
> cat(out, file = f, sep = "\n")
867
> 
867
> 
-
 
868
> ## IGNORE_RDIFF_BEGIN
868
> showNonASCIIfile(f)
869
> showNonASCIIfile(f)
869
1: fran<e7>ais: test of showNonASCII():
870
1: fran<e7>ais: test of showNonASCII():
870
4:    This has an <fc>mlaut in it.
871
4:    This has an <fc>mlaut in it.
-
 
872
> ## IGNORE_RDIFF_END
871
> unlink(f)
873
> unlink(f)
872
> 
874
> 
873
> 
875
> 
874
> 
876
> 
875
> cleanEx()
877
> cleanEx()
-
 
878
> nameEx("testInstalledPackage")
-
 
879
> ### * testInstalledPackage
-
 
880
> 
-
 
881
> flush(stderr()); flush(stdout())
-
 
882
> 
-
 
883
> ### Name: testInstalledPackage
-
 
884
> ### Title: Test Installed Packages
-
 
885
> ### Aliases: testInstalledPackage testInstalledPackages testInstalledBasic
-
 
886
> ###   TEST_MC_CORES standard_package_names
-
 
887
> ### Keywords: utilities
-
 
888
> 
-
 
889
> ### ** Examples
-
 
890
> 
-
 
891
> str(stPkgs <- standard_package_names())
-
 
892
List of 2
-
 
893
 $ base       : chr [1:14] "base" "tools" "utils" "grDevices" ...
-
 
894
 $ recommended: chr [1:15] "MASS" "lattice" "Matrix" "nlme" ...
-
 
895
> 
-
 
896
> 
-
 
897
> 
-
 
898
> cleanEx()
876
> nameEx("toHTML")
899
> nameEx("toHTML")
877
> ### * toHTML
900
> ### * toHTML
878
> 
901
> 
879
> flush(stderr()); flush(stdout())
902
> flush(stderr()); flush(stdout())
880
> 
903
> 
Line 1153... Line 1176...
1153
> ### * <FOOTER>
1176
> ### * <FOOTER>
1154
> ###
1177
> ###
1155
> cleanEx()
1178
> cleanEx()
1156
> options(digits = 7L)
1179
> options(digits = 7L)
1157
> base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
1180
> base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
1158
Time elapsed:  0.132 0.012 0.145 0 0 
1181
Time elapsed:  0.163 0.015 0.179 0 0 
1159
> grDevices::dev.off()
1182
> grDevices::dev.off()
1160
null device 
1183
null device 
1161
          1 
1184
          1 
1162
> ###
1185
> ###
1163
> ### Local variables: ***
1186
> ### Local variables: ***