The R Project SVN – R – Diff – /branches/R-exp-R5/tests/Examples/tools-Ex.Rout.save

-R version 2.12.0 Under development (unstable) (2010-06-15 r52287)
+R version 2.12.0 Under development (unstable) (2010-06-15 r52288)
 Copyright (C) 2010 The R Foundation for Statistical Computing
 ISBN 3-900051-07-0
-Platform: i386-pc-mingw32/i386 (32-bit)
+Platform: x86_64-unknown-linux-gnu (64-bit)
 R is free software and comes with ABSOLUTELY NO WARRANTY.
 You are welcome to redistribute it under certain conditions.
 Type 'license()' or 'licence()' for distribution details.
   Natural language support but running in an English locale
 R is a collaborative project with many contributors.
 Type 'contributors()' for more information and
 'citation()' on how to cite R or R packages in publications.
 Type 'demo()' for some demos, 'help()' for on-line help, or
 'help.start()' for an HTML browser interface to help.
 Type 'q()' to quit R.
 > pkgname <- "tools"
 > source(file.path(R.home("share"), "R", "examples-header.R"))
 > options(warn = 1)
-> options(pager = "console")
+> library('tools')
-> library('tools')
+>
->
+> assign(".oldSearch", search(), pos = 'CheckExEnv')
-> assign(".oldSearch", search(), pos = 'CheckExEnv')
+> cleanEx()
-> cleanEx()
+> nameEx("HTMLheader")
-> nameEx("HTMLheader")
+> ### * HTMLheader
-> ### * HTMLheader
+>
->
+> flush(stderr()); flush(stdout())
-> flush(stderr()); flush(stdout())
+>
->
+> ### Name: HTMLheader
-> ### Name: HTMLheader
+> ### Title: Generate a standard HTML header for R help.
-> ### Title: Generate a standard HTML header for R help.
+> ### Aliases: HTMLheader
-> ### Aliases: HTMLheader
+> ### Keywords: utilities documentation
-> ### Keywords: utilities documentation
+>
->
+> ### ** Examples
-> ### ** Examples
+>
->
+> cat(HTMLheader("This is a sample header"), sep="\n")
-> cat(HTMLheader("This is a sample header"), sep="\n")
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
-<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
+<html><head><title>R: This is a sample header</title>
-<html><head><title>R: This is a sample header</title>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
-<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<link rel="stylesheet" type="text/css" href="/doc/html/R.css">
-<link rel="stylesheet" type="text/css" href="/doc/html/R.css">
+</head><body>
-</head><body>
+<h1> This is a sample header
-<h1> This is a sample header
+<img class="toplogo" src="/doc/html/logo.jpg" alt="[R logo]"></h1>
-<img class="toplogo" src="/doc/html/logo.jpg" alt="[R logo]"></h1>
+</h1>
-</h1>
+<hr>
-<hr>
+<div align="center">
-<div align="center">
+<a href="/doc/html/index.html"><img src="/doc/html/up.jpg" alt="[Top]" width="30" height="30" border="0"></a>
-<a href="/doc/html/index.html"><img src="/doc/html/up.jpg" alt="[Top]" width="30" height="30" border="0"></a>
+</div>
-</div>
+>
 >
 >
->
+> cleanEx()
-> cleanEx()
+> nameEx("Rd2HTML")
-> nameEx("Rd2HTML")
+> ### * Rd2HTML
-> ### * Rd2HTML
+>
->
+> flush(stderr()); flush(stdout())
-> flush(stderr()); flush(stdout())
+>
->
+> ### Name: Rd2HTML
-> ### Name: Rd2HTML
+> ### Title: Rd Converters
-> ### Title: Rd Converters
+> ### Aliases: Rd2txt Rd2HTML Rd2ex Rd2latex
-> ### Aliases: Rd2txt Rd2HTML Rd2ex Rd2latex
+> ### Keywords: documentation
-> ### Keywords: documentation
+>
->
+> ### ** Examples
-> ### ** Examples
+> cleanEx()
-> cleanEx()
+> nameEx("Rd2txt_options")
-> nameEx("Rd2txt_options")
+> ### * Rd2txt_options
-> ### * Rd2txt_options
+>
->
+> flush(stderr()); flush(stdout())
-> flush(stderr()); flush(stdout())
+>
->
+> ### Name: Rd2txt_options
-> ### Name: Rd2txt_options
+> ### Title: Set formatting options for text help.
-> ### Title: Set formatting options for text help.
+> ### Aliases: Rd2txt_options
-> ### Aliases: Rd2txt_options
+> ### Keywords: documentation
-> ### Keywords: documentation
+>
->
+> ### ** Examples
-> ### ** Examples
+>
->
+> saveOpts <- Rd2txt_options()
-> saveOpts <- Rd2txt_options()
+> saveOpts
-> saveOpts
+$width
-$width
+[1] 80
-[1] 80
+$minIndent
-$minIndent
+[1] 10
-[1] 10
+$extraIndent
-$extraIndent
+[1] 4
-[1] 4
+$sectionIndent
-$sectionIndent
+[1] 5
-[1] 5
+$sectionExtra
-$sectionExtra
+[1] 2
-[1] 2
+$itemBullet
-$itemBullet
+[1] "* "
-[1] "* "
+$enumFormat
-$enumFormat
+function (n)
-function (n)
+sprintf("%d. ", n)
-sprintf("%d. ", n)
+<environment: 01d74cfc>
-<environment: 01d74cfc>
+$showURLs
-$showURLs
+[1] FALSE
-[1] FALSE
+> Rd2txt_options(minIndent=4)
-> Rd2txt_options(minIndent=4)
+> Rd2txt_options()
-> Rd2txt_options()
+$width
-$width
+[1] 80
-[1] 80
+$minIndent
-$minIndent
+[1] 4
-[1] 4
+$extraIndent
-$extraIndent
+[1] 4
-[1] 4
+$sectionIndent
-$sectionIndent
+[1] 5
-[1] 5
+$sectionExtra
-$sectionExtra
+[1] 2
-[1] 2
+$itemBullet
-$itemBullet
+[1] "* "
-[1] "* "
+$enumFormat
-$enumFormat
+function (n)
-function (n)
+sprintf("%d. ", n)
-sprintf("%d. ", n)
+<environment: 01d74cfc>
-<environment: 01d74cfc>
+$showURLs
-$showURLs
+[1] FALSE
-[1] FALSE
+> Rd2txt_options(saveOpts)
-> Rd2txt_options(saveOpts)
+> Rd2txt_options()
-> Rd2txt_options()
+$width
-$width
+[1] 80
-[1] 80
+$minIndent
-$minIndent
+[1] 10
-[1] 10
+$extraIndent
-$extraIndent
+[1] 4
-[1] 4
+$sectionIndent
-$sectionIndent
+[1] 5
-[1] 5
+$sectionExtra
-$sectionExtra
+[1] 2
-[1] 2
+$itemBullet
-$itemBullet
+[1] "* "
-[1] "* "
+$enumFormat
-$enumFormat
+function (n)
-function (n)
+sprintf("%d. ", n)
-sprintf("%d. ", n)
+<environment: 01d74cfc>
-<environment: 01d74cfc>
+$showURLs
-$showURLs
+[1] FALSE
-[1] FALSE
+>
 >
 >
->
+> cleanEx()
-> cleanEx()
+> nameEx("Rdutils")
-> nameEx("Rdutils")
+> ### * Rdutils
-> ### * Rdutils
+>
->
+> flush(stderr()); flush(stdout())
-> flush(stderr()); flush(stdout())
+>
->
+> ### Name: Rdutils
-> ### Name: Rdutils
+> ### Title: Rd Utilities
-> ### Title: Rd Utilities
+> ### Aliases: Rd_db
-> ### Aliases: Rd_db
+> ### Keywords: utilities documentation
-> ### Keywords: utilities documentation
+>
->
+> ### ** Examples
-> ### ** Examples
+>
 >
->
+> cleanEx()
-> cleanEx()
+> nameEx("bibstyle")
-> nameEx("bibstyle")
+> ### * bibstyle
-> ### * bibstyle
+>
->
+> flush(stderr()); flush(stdout())
-> flush(stderr()); flush(stdout())
+>
->
+> ### Name: bibstyle
-> ### Name: bibstyle
+> ### Title: Select or define a bibliography style.
-> ### Title: Select or define a bibliography style.
+> ### Aliases: bibstyle
-> ### Aliases: bibstyle
+> ### Keywords: utilties documentation
-> ### Keywords: utilties documentation
+>
->
+> ### ** Examples
-> ### ** Examples
+>
->
+> ## Don't show:
-> refs <-
+> options(useFancyQuotes = FALSE)
-+ c(bibentry(bibtype = "manual",
+> ## End Don't show
-+     title = "R: A Language and Environment for Statistical Computing",
+> refs <-
-+     author = person("R Development Core Team"),
++ c(bibentry(bibtype = "manual",
-+     organization = "R Foundation for Statistical Computing",
++     title = "R: A Language and Environment for Statistical Computing",
-+     address = "Vienna, Austria",
++     author = person("R Development Core Team"),
-+     year = 2010,
++     organization = "R Foundation for Statistical Computing",
-+     isbn = "3-900051-07-0",
++     address = "Vienna, Austria",
-+     url = "http://www.R-project.org"),
++     year = 2010,
-+   bibentry(bibtype = "article",
++     isbn = "3-900051-07-0",
-+     author = c(person(c("George", "E", "P"), "Box"),
++     url = "http://www.R-project.org"),
-+                person(c("David",  "R"),      "Cox")),
++   bibentry(bibtype = "article",
-+     year = 1964,
++     author = c(person(c("George", "E", "P"), "Box"),
-+     title="An Analysis of Transformations",
++                person(c("David",  "R"),      "Cox")),
-+     journal="Journal of the Royal Statistical Society, Series B",
++     year = 1964,
-+     volume=26,
++     title="An Analysis of Transformations",
-+     pages="211-252"))
++     journal="Journal of the Royal Statistical Society, Series B",
-> bibstyle("unsorted", sortKeys = function(refs) seq_along(refs), .init=TRUE)
++     volume=26,
-<environment: 017b7eb8>
++     pages="211-252"))
-> print(refs, .bibstyle="unsorted")
+> bibstyle("unsorted", sortKeys = function(refs) seq_along(refs), .init=TRUE)
-R Development Core Team (2010). _R: A Language and Environment for
+<environment: 017b7eb8>
-Statistical Computing_. R Foundation for Statistical Computing, Vienna,
+> print(refs, .bibstyle="unsorted")
-Austria. ISBN 3-900051-07-0, <URL: http://www.R-project.org>.
+R Development Core Team (2010). _R: A Language and Environment for
+Statistical Computing_. R Foundation for Statistical Computing, Vienna,
-Box GEP and Cox DR (1964). "An Analysis of Transformations." _Journal
+Austria. ISBN 3-900051-07-0, <URL: http://www.R-project.org>.
-of the Royal Statistical Society, Series B_, *26*, pp. 211-252.
->
+Box GEP and Cox DR (1964). "An Analysis of Transformations." _Journal
->
+of the Royal Statistical Society, Series B_, *26*, pp. 211-252.
 >
-> cleanEx()
+>
-> nameEx("charsets")
+>
-> ### * charsets
+> cleanEx()
->
+> nameEx("charsets")
-> flush(stderr()); flush(stdout())
+> ### * charsets
 >
-> ### Name: charsets
+> flush(stderr()); flush(stdout())
-> ### Title: Conversion Tables between Character Sets
+>
-> ### Aliases: Adobe_glyphs charset_to_Unicode
+> ### Name: charsets
-> ### Keywords: datasets
+> ### Title: Conversion Tables between Character Sets
->
+> ### Aliases: Adobe_glyphs charset_to_Unicode
-> ### ** Examples
+> ### Keywords: datasets
 >
-> ## find Adobe names for ISOLatin2 chars.
+> ### ** Examples
-> latin2 <- charset_to_Unicode[, "ISOLatin2"]
+>
-> aUnicode <- as.numeric(paste("0x", Adobe_glyphs$unicode, sep=""))
+> ## find Adobe names for ISOLatin2 chars.
-> keep <- aUnicode %in% latin2
+> latin2 <- charset_to_Unicode[, "ISOLatin2"]
-> aUnicode <- aUnicode[keep]
+> aUnicode <- as.numeric(paste("0x", Adobe_glyphs$unicode, sep=""))
-> aAdobe <- Adobe_glyphs[keep, 1]
+> keep <- aUnicode %in% latin2
-> ## first match
+> aUnicode <- aUnicode[keep]
-> aLatin2 <- aAdobe[match(latin2, aUnicode)]
+> aAdobe <- Adobe_glyphs[keep, 1]
-> ## all matches
+> ## first match
-> bLatin2 <- lapply(1:256, function(x) aAdobe[aUnicode == latin2[x]])
+> aLatin2 <- aAdobe[match(latin2, aUnicode)]
-> format(bLatin2, justify="none")
+> ## all matches
-  [1] ""                          "controlSTX"
+> bLatin2 <- lapply(1:256, function(x) aAdobe[aUnicode == latin2[x]])
-  [3] "controlSOT"                "controlETX"
+> format(bLatin2, justify="none")
-  [5] "controlEOT"                "controlENQ"
+  [1] ""                          "controlSTX"
-  [7] "controlACK"                "controlBEL"
+  [3] "controlSOT"                "controlETX"
-  [9] "controlBS"                 "controlHT"
+  [5] "controlEOT"                "controlENQ"
- [11] "controlLF"                 "controlVT"
+  [7] "controlACK"                "controlBEL"
- [13] "controlFF"                 "controlCR"
+  [9] "controlBS"                 "controlHT"
- [15] "controlSO"                 "controlSI"
+ [11] "controlLF"                 "controlVT"
- [17] "controlDLE"                "controlDC1"
+ [13] "controlFF"                 "controlCR"
- [19] "controlDC2"                "controlDC3"
+ [15] "controlSO"                 "controlSI"
- [21] "controlDC4"                "controlNAK"
+ [17] "controlDLE"                "controlDC1"
- [23] "controlSYN"                "controlETB"
+ [19] "controlDC2"                "controlDC3"
- [25] "controlCAN"                "controlEM"
+ [21] "controlDC4"                "controlNAK"
- [27] "controlSUB"                "controlESC"
+ [23] "controlSYN"                "controlETB"
- [29] "controlFS"                 "controlGS"
+ [25] "controlCAN"                "controlEM"
- [31] "controlRS"                 "controlUS"
+ [27] "controlSUB"                "controlESC"
- [33] "space, spacehackarabic"    "exclam"
+ [29] "controlFS"                 "controlGS"
- [35] "quotedbl"                  "numbersign"
+ [31] "controlRS"                 "controlUS"
- [37] "dollar"                    "percent"
+ [33] "space, spacehackarabic"    "exclam"
- [39] "ampersand"                 "quotesingle"
+ [35] "quotedbl"                  "numbersign"
- [41] "parenleft"                 "parenright"
+ [37] "dollar"                    "percent"
- [43] "asterisk"                  "plus"
+ [39] "ampersand"                 "quotesingle"
- [45] "comma"                     "hyphen"
+ [41] "parenleft"                 "parenright"
- [47] "period"                    "slash"
+ [43] "asterisk"                  "plus"
- [49] "zero"                      "one"
+ [45] "comma"                     "hyphen"
- [51] "two"                       "three"
+ [47] "period"                    "slash"
- [53] "four"                      "five"
+ [49] "zero"                      "one"
- [55] "six"                       "seven"
+ [51] "two"                       "three"
- [57] "eight"                     "nine"
+ [53] "four"                      "five"
- [59] "colon"                     "semicolon"
+ [55] "six"                       "seven"
- [61] "less"                      "equal"
+ [57] "eight"                     "nine"
- [63] "greater"                   "question"
+ [59] "colon"                     "semicolon"
- [65] "at"                        "A"
+ [61] "less"                      "equal"
- [67] "B"                         "C"
+ [63] "greater"                   "question"
- [69] "D"                         "E"
+ [65] "at"                        "A"
- [71] "F"                         "G"
+ [67] "B"                         "C"
- [73] "H"                         "I"
+ [69] "D"                         "E"
- [75] "J"                         "K"
+ [71] "F"                         "G"
- [77] "L"                         "M"
+ [73] "H"                         "I"
- [79] "N"                         "O"
+ [75] "J"                         "K"
- [81] "P"                         "Q"
+ [77] "L"                         "M"
- [83] "R"                         "S"
+ [79] "N"                         "O"
- [85] "T"                         "U"
+ [81] "P"                         "Q"
- [87] "V"                         "W"
+ [83] "R"                         "S"
- [89] "X"                         "Y"
+ [85] "T"                         "U"
- [91] "Z"                         "bracketleft"
+ [87] "V"                         "W"
- [93] "backslash"                 "bracketright"
+ [89] "X"                         "Y"
- [95] "asciicircum"               "underscore"
+ [91] "Z"                         "bracketleft"
- [97] "grave"                     "a"
+ [93] "backslash"                 "bracketright"
- [99] "b"                         "c"
+ [95] "asciicircum"               "underscore"
-[101] "d"                         "e"
+ [97] "grave"                     "a"
-[103] "f"                         "g"
+ [99] "b"                         "c"
-[105] "h"                         "i"
+[101] "d"                         "e"
-[107] "j"                         "k"
+[103] "f"                         "g"
-[109] "l"                         "m"
+[105] "h"                         "i"
-[111] "n"                         "o"
+[107] "j"                         "k"
-[113] "p"                         "q"
+[109] "l"                         "m"
-[115] "r"                         "s"
+[111] "n"                         "o"
-[117] "t"                         "u"
+[113] "p"                         "q"
-[119] "v"                         "w"
+[115] "r"                         "s"
-[121] "x"                         "y"
+[117] "t"                         "u"
-[123] "z"                         "braceleft"
+[119] "v"                         "w"
-[125] "bar, verticalbar"          "braceright"
+[121] "x"                         "y"
-[127] "asciitilde"                "controlDEL"
+[123] "z"                         "braceleft"
-[129] ""                          ""
+[125] "bar, verticalbar"          "braceright"
-[131] ""                          ""
+[127] "asciitilde"                "controlDEL"
-[133] ""                          ""
+[129] ""                          ""
-[135] ""                          ""
+[131] ""                          ""
-[137] ""                          ""
+[133] ""                          ""
-[139] ""                          ""
+[135] ""                          ""
-[141] ""                          ""
+[137] ""                          ""
-[143] ""                          ""
+[139] ""                          ""
-[145] ""                          ""
+[141] ""                          ""
-[147] ""                          ""
+[143] ""                          ""
-[149] ""                          ""
+[145] ""                          ""
-[151] ""                          ""
+[147] ""                          ""
-[153] ""                          ""
+[149] ""                          ""
-[155] ""                          ""
+[151] ""                          ""
-[157] ""                          ""
+[153] ""                          ""
-[159] ""                          ""
+[155] ""                          ""
-[161] "nbspace, nonbreakingspace" "Aogonek"
+[157] ""                          ""
-[163] "breve"                     "Lslash"
+[159] ""                          ""
-[165] "currency"                  "Lcaron"
+[161] "nbspace, nonbreakingspace" "Aogonek"
-[167] "Sacute"                    "section"
+[163] "breve"                     "Lslash"
-[169] "dieresis"                  "Scaron"
+[165] "currency"                  "Lcaron"
-[171] "Scedilla"                  "Tcaron"
+[167] "Sacute"                    "section"
-[173] "Zacute"                    "sfthyphen, softhyphen"
+[169] "dieresis"                  "Scaron"
-[175] "Zcaron"                    "Zdot, Zdotaccent"
+[171] "Scedilla"                  "Tcaron"
-[177] "degree"                    "aogonek"
+[173] "Zacute"                    "sfthyphen, softhyphen"
-[179] "ogonek"                    "lslash"
+[175] "Zcaron"                    "Zdot, Zdotaccent"
-[181] "acute"                     "lcaron"
+[177] "degree"                    "aogonek"
-[183] "sacute"                    "caron"
+[179] "ogonek"                    "lslash"
-[185] "cedilla"                   "scaron"
+[181] "acute"                     "lcaron"
-[187] "scedilla"                  "tcaron"
+[183] "sacute"                    "caron"
-[189] "zacute"                    "hungarumlaut"
+[185] "cedilla"                   "scaron"
-[191] "zcaron"                    "zdot, zdotaccent"
+[187] "scedilla"                  "tcaron"
-[193] "Racute"                    "Aacute"
+[189] "zacute"                    "hungarumlaut"
-[195] "Acircumflex"               "Abreve"
+[191] "zcaron"                    "zdot, zdotaccent"
-[197] "Adieresis"                 "Lacute"
+[193] "Racute"                    "Aacute"
-[199] "Cacute"                    "Ccedilla"
+[195] "Acircumflex"               "Abreve"
-[201] "Ccaron"                    "Eacute"
+[197] "Adieresis"                 "Lacute"
-[203] "Eogonek"                   "Edieresis"
+[199] "Cacute"                    "Ccedilla"
-[205] "Ecaron"                    "Iacute"
+[201] "Ccaron"                    "Eacute"
-[207] "Icircumflex"               "Dcaron"
+[203] "Eogonek"                   "Edieresis"
-[209] "Dcroat, Dslash"            "Nacute"
+[205] "Ecaron"                    "Iacute"
-[211] "Ncaron"                    "Oacute"
+[207] "Icircumflex"               "Dcaron"
-[213] "Ocircumflex"               "Odblacute, Ohungarumlaut"
+[209] "Dcroat, Dslash"            "Nacute"
-[215] "Odieresis"                 "multiply"
+[211] "Ncaron"                    "Oacute"
-[217] "Rcaron"                    "Uring"
+[213] "Ocircumflex"               "Odblacute, Ohungarumlaut"
-[219] "Uacute"                    "Udblacute, Uhungarumlaut"
+[215] "Odieresis"                 "multiply"
-[221] "Udieresis"                 "Yacute"
+[217] "Rcaron"                    "Uring"
-[223] "Tcedilla, Tcommaaccent"    "germandbls"
+[219] "Uacute"                    "Udblacute, Uhungarumlaut"
-[225] "racute"                    "aacute"
+[221] "Udieresis"                 "Yacute"
-[227] "acircumflex"               "abreve"
+[223] "Tcedilla, Tcommaaccent"    "germandbls"
-[229] "adieresis"                 "lacute"
+[225] "racute"                    "aacute"
-[231] "cacute"                    "ccedilla"
+[227] "acircumflex"               "abreve"
-[233] "ccaron"                    "eacute"
+[229] "adieresis"                 "lacute"
-[235] "eogonek"                   "edieresis"
+[231] "cacute"                    "ccedilla"
-[237] "ecaron"                    "iacute"
+[233] "ccaron"                    "eacute"
-[239] "icircumflex"               "dcaron"
+[235] "eogonek"                   "edieresis"
-[241] "dcroat, dmacron"           "nacute"
+[237] "ecaron"                    "iacute"
-[243] "ncaron"                    "oacute"
+[239] "icircumflex"               "dcaron"
-[245] "ocircumflex"               "odblacute, ohungarumlaut"
+[241] "dcroat, dmacron"           "nacute"
-[247] "odieresis"                 "divide"
+[243] "ncaron"                    "oacute"
-[249] "rcaron"                    "uring"
+[245] "ocircumflex"               "odblacute, ohungarumlaut"
-[251] "uacute"                    "udblacute, uhungarumlaut"
+[247] "odieresis"                 "divide"
-[253] "udieresis"                 "yacute"
+[249] "rcaron"                    "uring"
-[255] "tcedilla, tcommaaccent"    "dotaccent"
+[251] "uacute"                    "udblacute, uhungarumlaut"
->
+[253] "udieresis"                 "yacute"
->
+[255] "tcedilla, tcommaaccent"    "dotaccent"
 >
-> cleanEx()
+>
-> nameEx("checkFF")
+>
-> ### * checkFF
+> cleanEx()
->
+> nameEx("checkFF")
-> flush(stderr()); flush(stdout())
+> ### * checkFF
 >
-> ### Name: checkFF
+> flush(stderr()); flush(stdout())
-> ### Title: Check Foreign Function Calls
+>
-> ### Aliases: checkFF print.checkFF
+> ### Name: checkFF
-> ### Keywords: programming utilities
+> ### Title: Check Foreign Function Calls
->
+> ### Aliases: checkFF print.checkFF
-> ### ** Examples
+> ### Keywords: programming utilities
 >
->
+> ### ** Examples
-> cleanEx()
+>
-> nameEx("checkRdaFiles")
+>
-> ### * checkRdaFiles
+> cleanEx()
->
+> nameEx("checkRdaFiles")
-> flush(stderr()); flush(stdout())
+> ### * checkRdaFiles
 >
-> ### Name: checkRdaFiles
+> flush(stderr()); flush(stdout())
-> ### Title: Report on Details of Saved Images or Re-saves them
+>
-> ### Aliases: checkRdaFiles resaveRdaFiles
+> ### Name: checkRdaFiles
-> ### Keywords: utilities
+> ### Title: Report on Details of Saved Images or Re-saves them
->
+> ### Aliases: checkRdaFiles resaveRdaFiles
-> ### ** Examples
+> ### Keywords: utilities
-> ## Not run:
+>
-> ##D ## from a package top-level source directory
+> ### ** Examples
-> ##D paths <- sort(Sys.glob(c("data/*.rda", "data/*.RData")))
+> ## Not run:
-> ##D (res <- checkRdaFiles(paths))
+> ##D ## from a package top-level source directory
-> ##D ## pick out some that may need attention
+> ##D paths <- sort(Sys.glob(c("data/*.rda", "data/*.RData")))
-> ##D bad <- is.na(res$ASCII) | res$ASCII | (res$size > 1e4 & res$compress == "none")
+> ##D (res <- checkRdaFiles(paths))
-> ##D res[bad, ]
+> ##D ## pick out some that may need attention
-> ## End(Not run)
+> ##D bad <- is.na(res$ASCII) | res$ASCII | (res$size > 1e4 & res$compress == "none")
->
+> ##D res[bad, ]
->
+> ## End(Not run)
-> cleanEx()
+>
-> nameEx("delimMatch")
+>
-> ### * delimMatch
+> cleanEx()
->
+> nameEx("delimMatch")
-> flush(stderr()); flush(stdout())
+> ### * delimMatch
 >
-> ### Name: delimMatch
+> flush(stderr()); flush(stdout())
-> ### Title: Delimited Pattern Matching
+>
-> ### Aliases: delimMatch
+> ### Name: delimMatch
-> ### Keywords: character
+> ### Title: Delimited Pattern Matching
->
+> ### Aliases: delimMatch
-> ### ** Examples
+> ### Keywords: character
 >
-> x <- c("\\value{foo}", "function(bar)")
+> ### ** Examples
-> delimMatch(x)
+>
-[1]  7 -1
+> x <- c("\\value{foo}", "function(bar)")
-attr(,"match.length")
+> delimMatch(x)
-[1]  5 -1
+[1]  7 -1
-> delimMatch(x, c("(", ")"))
+attr(,"match.length")
-[1] -1  9
+[1]  5 -1
-attr(,"match.length")
+> delimMatch(x, c("(", ")"))
-[1] -1  5
+[1] -1  9
->
+attr(,"match.length")
->
+[1] -1  5
 >
-> cleanEx()
+>
-> nameEx("dependsOnPkgs")
+>
-> ### * dependsOnPkgs
+> cleanEx()
->
+> nameEx("dependsOnPkgs")
-> flush(stderr()); flush(stdout())
+> ### * dependsOnPkgs
 >
-> ### Name: dependsOnPkgs
+> flush(stderr()); flush(stdout())
-> ### Title: Find Reverse Dependencies
+>
-> ### Aliases: dependsOnPkgs
+> ### Name: dependsOnPkgs
-> ### Keywords: utilities
+> ### Title: Find Reverse Dependencies
->
+> ### Aliases: dependsOnPkgs
-> ### ** Examples
+> ### Keywords: utilities
 >
-> ## there are few dependencies in a vanilla R installation
+> ### ** Examples
-> dependsOnPkgs("lattice")
+>
-[1] "Matrix" "nlme"   "mgcv"
+> ## there are few dependencies in a vanilla R installation
->
+> dependsOnPkgs("lattice")
->
+[1] "Matrix" "nlme"   "mgcv"
 >
-> cleanEx()
+>
-> nameEx("encoded")
+>
-> ### * encoded
+> cleanEx()
->
+> nameEx("encoded")
-> flush(stderr()); flush(stdout())
+> ### * encoded
 >
-> ### Name: encoded_text_to_latex
+> flush(stderr()); flush(stdout())
-> ### Title: Translate non-ASCII Text to LaTeX Escapes
+>
-> ### Aliases: encoded_text_to_latex
+> ### Name: encoded_text_to_latex
-> ### Keywords: utilities
+> ### Title: Translate non-ASCII Text to LaTeX Escapes
->
+> ### Aliases: encoded_text_to_latex
-> ### ** Examples
+> ### Keywords: utilities
 >
-> x <- "fa\xE7ile"
+> ### ** Examples
-> encoded_text_to_latex(x, "latin1")
+>
-[1] "fa{\\c c}ile"
+> x <- "fa\xE7ile"
-> ## Not run:
+> encoded_text_to_latex(x, "latin1")
-> ##D ## create a tex file to show the upper half of 8-bit charsets
+[1] "fa{\\c c}ile"
-> ##D x <- rawToChar(as.raw(160:255), multiple=TRUE)
+> ## Not run:
-> ##D (x <- matrix(x, ncol=16, byrow=TRUE))
+> ##D ## create a tex file to show the upper half of 8-bit charsets
-> ##D xx <- x
+> ##D x <- rawToChar(as.raw(160:255), multiple=TRUE)
-> ##D xx[] <- encoded_text_to_latex(x, "latin1") # or latin2 or latin9
+> ##D (x <- matrix(x, ncol=16, byrow=TRUE))
-> ##D xx <- apply(xx, 1, paste, collapse="&")
+> ##D xx <- x
-> ##D con <- file("test-encoding.tex", "w")
+> ##D xx[] <- encoded_text_to_latex(x, "latin1") # or latin2 or latin9
-> ##D header <- c(
+> ##D xx <- apply(xx, 1, paste, collapse="&")
-> ##D "\\documentclass{article}",
+> ##D con <- file("test-encoding.tex", "w")
-> ##D "\\usepackage[T1]{fontenc}",
+> ##D header <- c(
-> ##D "\\usepackage{Rd}",
+> ##D "\\documentclass{article}",
-> ##D "\\begin{document}",
+> ##D "\\usepackage[T1]{fontenc}",
-> ##D "\\HeaderA{test}{}{test}",
+> ##D "\\usepackage{Rd}",
-> ##D "\\begin{Details}\relax",
+> ##D "\\begin{document}",
-> ##D "\\Tabular{cccccccccccccccc}{")
+> ##D "\\HeaderA{test}{}{test}",
-> ##D trailer <- c("}", "\\end{Details}", "\\end{document}")
+> ##D "\\begin{Details}\relax",
-> ##D writeLines(header, con)
+> ##D "\\Tabular{cccccccccccccccc}{")
-> ##D writeLines(paste(xx, "\\", sep=""), con)
+> ##D trailer <- c("}", "\\end{Details}", "\\end{document}")
-> ##D writeLines(trailer, con)
+> ##D writeLines(header, con)
-> ##D close(con)
+> ##D writeLines(paste(xx, "\\", sep=""), con)
-> ##D ## and some UTF_8 chars
+> ##D writeLines(trailer, con)
-> ##D x <- intToUtf8(as.integer(
+> ##D close(con)
-> ##D     c(160:383,0x0192,0x02C6,0x02C7,0x02CA,0x02D8,
+> ##D ## and some UTF_8 chars
-> ##D       0x02D9, 0x02DD, 0x200C, 0x2018, 0x2019, 0x201C,
+> ##D x <- intToUtf8(as.integer(
-> ##D       0x201D, 0x2020, 0x2022, 0x2026, 0x20AC)),
+> ##D     c(160:383,0x0192,0x02C6,0x02C7,0x02CA,0x02D8,
-> ##D                multiple=TRUE)
+> ##D       0x02D9, 0x02DD, 0x200C, 0x2018, 0x2019, 0x201C,
-> ##D x <- matrix(x, ncol=16, byrow=TRUE)
+> ##D       0x201D, 0x2020, 0x2022, 0x2026, 0x20AC)),
-> ##D xx <- x
+> ##D                multiple=TRUE)
-> ##D xx[] <- encoded_text_to_latex(x, "UTF-8")
+> ##D x <- matrix(x, ncol=16, byrow=TRUE)
-> ##D xx <- apply(xx, 1, paste, collapse="&")
+> ##D xx <- x
-> ##D con <- file("test-utf8.tex", "w")
+> ##D xx[] <- encoded_text_to_latex(x, "UTF-8")
-> ##D writeLines(header, con)
+> ##D xx <- apply(xx, 1, paste, collapse="&")
-> ##D writeLines(paste(xx, "\\", sep=""), con)
+> ##D con <- file("test-utf8.tex", "w")
-> ##D writeLines(trailer, con)
+> ##D writeLines(header, con)
-> ##D close(con)
+> ##D writeLines(paste(xx, "\\", sep=""), con)
-> ## End(Not run)
+> ##D writeLines(trailer, con)
->
+> ##D close(con)
->
+> ## End(Not run)
-> cleanEx()
+>
-> nameEx("fileutils")
+>
-> ### * fileutils
+> cleanEx()
->
+> nameEx("fileutils")
-> flush(stderr()); flush(stdout())
+> ### * fileutils
 >
-> ### Name: fileutils
+> flush(stderr()); flush(stdout())
-> ### Title: File Utilities
+>
-> ### Aliases: file_ext file_path_as_absolute file_path_sans_ext
+> ### Name: fileutils
-> ###   list_files_with_exts list_files_with_type
+> ### Title: File Utilities
-> ### Keywords: file
+> ### Aliases: file_ext file_path_as_absolute file_path_sans_ext
->
+> ###   list_files_with_exts list_files_with_type
-> ### ** Examples
+> ### Keywords: file
 >
->
+> ### ** Examples
-> cleanEx()
+>
-> nameEx("getDepList")
+>
-> ### * getDepList
+> cleanEx()
->
+> nameEx("getDepList")
-> flush(stderr()); flush(stdout())
+> ### * getDepList
 >
-> ### Name: getDepList
+> flush(stderr()); flush(stdout())
-> ### Title: Functions to Retrieve Dependency Information
+>
-> ### Aliases: getDepList pkgDepends
+> ### Name: getDepList
-> ### Keywords: utilities
+> ### Title: Functions to Retrieve Dependency Information
->
+> ### Aliases: getDepList pkgDepends
-> ### ** Examples
+> ### Keywords: utilities
 >
-> pkgDepends("tools", local = FALSE)
+> ### ** Examples
-$Depends
+>
-character(0)
+> pkgDepends("tools", local = FALSE)
+$Depends
-$Installed
+character(0)
-character(0)
+$Installed
-$Found
+character(0)
-list()
+$Found
-$NotFound
+list()
-character(0)
+$NotFound
-$R
+character(0)
-character(0)
+$R
-attr(,"class")
+character(0)
-[1] "DependsList" "list"
->
+attr(,"class")
->
+[1] "DependsList" "list"
 >
-> cleanEx()
+>
-> nameEx("installFoundDepends")
+>
-> ### * installFoundDepends
+> cleanEx()
->
+> nameEx("installFoundDepends")
-> flush(stderr()); flush(stdout())
+> ### * installFoundDepends
 >
-> ### Name: installFoundDepends
+> flush(stderr()); flush(stdout())
-> ### Title: A function to install unresolved dependencies
+>
-> ### Aliases: installFoundDepends
+> ### Name: installFoundDepends
-> ### Keywords: utilities
+> ### Title: A function to install unresolved dependencies
->
+> ### Aliases: installFoundDepends
-> ### ** Examples
+> ### Keywords: utilities
 >
-> ## Set up a temporary directory to install packages to
+> ### ** Examples
-> tmp <- tempfile()
+>
-> dir.create(tmp)
+> ## Set up a temporary directory to install packages to
->
+> tmp <- tempfile()
-> pDL <- pkgDepends("tools",local=FALSE)
+> dir.create(tmp)
-> installFoundDepends(pDL$Found, destdir=tmp)
+>
-NULL
+> pDL <- pkgDepends("tools",local=FALSE)
->
+> installFoundDepends(pDL$Found, destdir=tmp)
->
+NULL
 >
-> cleanEx()
+>
-> nameEx("makeLazyLoading")
+>
-> ### * makeLazyLoading
+> cleanEx()
->
+> nameEx("makeLazyLoading")
-> flush(stderr()); flush(stdout())
+> ### * makeLazyLoading
 >
-> ### Name: makeLazyLoading
+> flush(stderr()); flush(stdout())
-> ### Title: Lazy Loading of Packages
+>
-> ### Aliases: makeLazyLoading
+> ### Name: makeLazyLoading
-> ### Keywords: utilities
+> ### Title: Lazy Loading of Packages
->
+> ### Aliases: makeLazyLoading
-> ### ** Examples
+> ### Keywords: utilities
 >
-> ## set up package "splines" for lazy loading -- already done
+> ### ** Examples
-> ## Not run:
+>
-> ##D tools:::makeLazyLoading("splines")
+> ## set up package "splines" for lazy loading -- already done
-> ## End(Not run)
+> ## Not run:
->
+> ##D tools:::makeLazyLoading("splines")
->
+> ## End(Not run)
 >
-> cleanEx()
+>
-> nameEx("md5sum")
+>
-> ### * md5sum
+> cleanEx()
->
+> nameEx("md5sum")
-> flush(stderr()); flush(stdout())
+> ### * md5sum
 >
-> ### Name: md5sum
+> flush(stderr()); flush(stdout())
-> ### Title: Compute MD5 Checksums
+>
-> ### Aliases: md5sum
+> ### Name: md5sum
-> ### Keywords: utilities
+> ### Title: Compute MD5 Checksums
->
+> ### Aliases: md5sum
-> ### ** Examples
+> ### Keywords: utilities
 >
-> as.vector(md5sum(dir(R.home(), pattern="^COPY", full.names=TRUE)))
+> ### ** Examples
-[1] "eb723b61539feef013de476e68b5c50a"
+>
->
+> as.vector(md5sum(dir(R.home(), pattern="^COPY", full.names=TRUE)))
->
+[1] "eb723b61539feef013de476e68b5c50a"
 >
-> cleanEx()
+>
-> nameEx("readNEWS")
+>
-> ### * readNEWS
+> cleanEx()
->
+> nameEx("readNEWS")
-> flush(stderr()); flush(stdout())
+> ### * readNEWS
 >
-> ### Name: readNEWS
+> flush(stderr()); flush(stdout())
-> ### Title: Read R's NEWS file or a similar one
+>
-> ### Aliases: readNEWS checkNEWS
+> ### Name: readNEWS
-> ### Keywords: file documentation
+> ### Title: Read R's NEWS file or a similar one
->
+> ### Aliases: readNEWS checkNEWS
-> ### ** Examples
+> ### Keywords: file documentation
-> # Check the current NEWS file
+>
->
+> ### ** Examples
-> stopifnot(checkNEWS())
+> # Check the current NEWS file
 >
->
+> stopifnot(checkNEWS())
 >
 >
-> cleanEx()
+>
-> nameEx("showNonASCII")
+>
-> ### * showNonASCII
+> cleanEx()
->
+> nameEx("showNonASCII")
-> flush(stderr()); flush(stdout())
+> ### * showNonASCII
 >
-> ### Name: showNonASCII
+> flush(stderr()); flush(stdout())
-> ### Title: Highlight non-ASCII characters
+>
-> ### Aliases: showNonASCII
+> ### Name: showNonASCII
-> ### Keywords: utilities
+> ### Title: Highlight non-ASCII characters
->
+> ### Aliases: showNonASCII
-> ### ** Examples
+> ### Keywords: utilities
 >
-> out <- c(
+> ### ** Examples
-+ "fa\xE7ile test of showNonASCII():",
+>
-+ "\\details{",
+> out <- c(
-+ "   This is a good line",
++ "fa\xE7ile test of showNonASCII():",
-+ "   This has an \xfcmlaut in it.",
++ "\\details{",
-+ "   OK again.",
++ "   This is a good line",
-+ "}")
++ "   This has an \xfcmlaut in it.",
-> f <- tempfile()
++ "   OK again.",
-> cat(out, file = f, sep = "\n")
++ "}")
->
+> f <- tempfile()
-> showNonASCII(readLines(f))
+> cat(out, file = f, sep = "\n")
-: fa<e7>ile test of showNonASCII():
+>
-:    This has an <fc>mlaut in it.
+> showNonASCII(readLines(f))
-> unlink(f)
+: fa<e7>ile test of showNonASCII():
->
+:    This has an <fc>mlaut in it.
->
+> unlink(f)
 >
-> cleanEx()
+>
-> nameEx("toHTML")
+>
-> ### * toHTML
+> cleanEx()
->
+> nameEx("toHTML")
-> flush(stderr()); flush(stdout())
+> ### * toHTML
 >
-> ### Name: toHTML
+> flush(stderr()); flush(stdout())
-> ### Title: Display an object in HTML.
+>
-> ### Aliases: toHTML toHTML.packageIQR toHTML.news_db
+> ### Name: toHTML
-> ### Keywords: utilities documentation
+> ### Title: Display an object in HTML.
->
+> ### Aliases: toHTML toHTML.packageIQR toHTML.news_db
-> ### ** Examples
+> ### Keywords: utilities documentation
 >
-> cat(toHTML(demo(package="base")), sep="\n")
+> ### ** Examples
-<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
+>
-<html><head><title>R: R</title>
+> cat(toHTML(demo(package="base")), sep="\n")
-<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
-<link rel="stylesheet" type="text/css" href="/doc/html/R.css">
+<html><head><title>R: R</title>
-</head><body>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
-<h1> R
+<link rel="stylesheet" type="text/css" href="/doc/html/R.css">
-<img class="toplogo" src="/doc/html/logo.jpg" alt="[R logo]"></h1>
+</head><body>
-</h1>
+<h1> R
-<hr>
+<img class="toplogo" src="/doc/html/logo.jpg" alt="[R logo]"></h1>
-<div align="center">
+</h1>
-<a href="/doc/html/index.html"><img src="/doc/html/up.jpg" alt="[Top]" width="30" height="30" border="0"></a>
+<hr>
-</div>
+<div align="center">
-<h2>Demos in package &lsquo;base&rsquo;</h2>
+<a href="/doc/html/index.html"><img src="/doc/html/up.jpg" alt="[Top]" width="30" height="30" border="0"></a>
-<table cols="2" width="100%">
+</div>
-<tr>
+<h2>Demos in package &lsquo;base&rsquo;</h2>
- <td align="left" valign="top" width="10%">
+<table cols="2" width="100%">
-is.things
+<tr>
- </td>
+ <td align="left" valign="top" width="10%">
- <td align="left" valign="top" width="90%">
+is.things
-Explore some properties of R objects and is.FOO() functions. Not for newbies!
+ </td>
- </td>
+ <td align="left" valign="top" width="90%">
-</tr>
+Explore some properties of R objects and is.FOO() functions. Not for newbies!
+ </td>
-<tr>
+</tr>
- <td align="left" valign="top" width="10%">
-recursion
+<tr>
- </td>
+ <td align="left" valign="top" width="10%">
- <td align="left" valign="top" width="90%">
+recursion
-Using recursion for adaptive integration
+ </td>
- </td>
+ <td align="left" valign="top" width="90%">
-</tr>
+Using recursion for adaptive integration
+ </td>
-<tr>
+</tr>
- <td align="left" valign="top" width="10%">
-scoping
+<tr>
- </td>
+ <td align="left" valign="top" width="10%">
- <td align="left" valign="top" width="90%">
+scoping
-An illustration of lexical scoping.
+ </td>
- </td>
+ <td align="left" valign="top" width="90%">
-</tr>
+An illustration of lexical scoping.
+ </td>
-</table>
+</tr>
-<p>
-</p>
+</table>
-</body></html>
+<p>
->
+</p>
->
+</body></html>
 >
-> cleanEx()
+>
-> nameEx("undoc")
+>
-> ### * undoc
+> cleanEx()
->
+> nameEx("undoc")
-> flush(stderr()); flush(stdout())
+> ### * undoc
 >
-> ### Name: undoc
+> flush(stderr()); flush(stdout())
-> ### Title: Find Undocumented Objects
+>
-> ### Aliases: undoc print.undoc
+> ### Name: undoc
-> ### Keywords: documentation
+> ### Title: Find Undocumented Objects
->
+> ### Aliases: undoc print.undoc
-> ### ** Examples
+> ### Keywords: documentation
 >
-> undoc("tools")                  # Undocumented objects in 'tools'
+> ### ** Examples
 >
->
+> undoc("tools")                  # Undocumented objects in 'tools'
 >
-> cleanEx()
+>
-> nameEx("vignetteDepends")
+>
-> ### * vignetteDepends
+> cleanEx()
->
+> nameEx("vignetteDepends")
-> flush(stderr()); flush(stdout())
+> ### * vignetteDepends
 >
-> ### Name: vignetteDepends
+> flush(stderr()); flush(stdout())
-> ### Title: Retrieve Dependency Information for a Vignette
+>
-> ### Aliases: vignetteDepends
+> ### Name: vignetteDepends
-> ### Keywords: utilities
+> ### Title: Retrieve Dependency Information for a Vignette
->
+> ### Aliases: vignetteDepends
-> ### ** Examples
+> ### Keywords: utilities
 >
-> ## This may not be installed
+> ### ** Examples
-> gridEx <- system.file("doc", "grid.Snw", package = "grid")
+>
-> vignetteDepends(gridEx)
+> ## This may not be installed
-$Depends
+> gridEx <- system.file("doc", "grid.Snw", package = "grid")
-[1] "lattice"
+> vignetteDepends(gridEx)
+$Depends
-$Installed
+[1] "lattice"
-[1] "lattice"
+$Installed
-$Found
+[1] "lattice"
-list()
+$Found
-$NotFound
+list()
-character(0)
+$NotFound
-$R
+character(0)
-[1] "R (>= 2.11.0)"
+$R
-attr(,"class")
+[1] "R (>= 2.11.0)"
-[1] "DependsList" "list"
->
+attr(,"class")
->
+[1] "DependsList" "list"
 >
-> cleanEx()
+>
-> nameEx("writePACKAGES")
+>
-> ### * writePACKAGES
+> cleanEx()
->
+> nameEx("writePACKAGES")
-> flush(stderr()); flush(stdout())
+> ### * writePACKAGES
 >
-> ### Name: write_PACKAGES
+> flush(stderr()); flush(stdout())
-> ### Title: Generate PACKAGES files
+>
-> ### Aliases: write_PACKAGES
+> ### Name: write_PACKAGES
-> ### Keywords: file utilities
+> ### Title: Generate PACKAGES files
->
+> ### Aliases: write_PACKAGES
-> ### ** Examples
+> ### Keywords: file utilities
 >
-> ## Not run:
+> ### ** Examples
-> ##D write_PACKAGES("c:/myFolder/myRepository")  # on Windows
+>
-> ##D write_PACKAGES("/pub/RWin/bin/windows/contrib/2.9",
+> ## Not run:
-> ##D                type="win.binary")  # on Linux
+> ##D write_PACKAGES("c:/myFolder/myRepository")  # on Windows
-> ## End(Not run)
+> ##D write_PACKAGES("/pub/RWin/bin/windows/contrib/2.9",
->
+> ##D                type="win.binary")  # on Linux
->
+> ## End(Not run)
-> cleanEx()
+>
-> nameEx("xgettext")
+>
-> ### * xgettext
+> cleanEx()
->
+> nameEx("xgettext")
-> flush(stderr()); flush(stdout())
+> ### * xgettext
 >
-> ### Name: xgettext
+> flush(stderr()); flush(stdout())
-> ### Title: Extract Translatable Messages from R Files in a Package
+>
-> ### Aliases: xgettext xngettext xgettext2pot
+> ### Name: xgettext
-> ### Keywords: utilities
+> ### Title: Extract Translatable Messages from R Files in a Package
->
+> ### Aliases: xgettext xngettext xgettext2pot
-> ### ** Examples
+> ### Keywords: utilities
-> ## Not run:
+>
-> ##D ## in a source-directory build of R:
+> ### ** Examples
-> ##D xgettext(file.path(R.home(), "src", "library", "splines"))
+> ## Not run:
-> ## End(Not run)
+> ##D ## in a source-directory build of R:
->
+> ##D xgettext(file.path(R.home(), "src", "library", "splines"))
->
+> ## End(Not run)
-> ### * <FOOTER>
+>
-> ###
+>
-> cat("Time elapsed: ", proc.time() - get("ptime", pos = 'CheckExEnv'),"\n")
+> ### * <FOOTER>
-Time elapsed:  1.46 0.18 1.76 NA NA
+> ###
-> grDevices::dev.off()
+> cat("Time elapsed: ", proc.time() - get("ptime", pos = 'CheckExEnv'),"\n")
-null device
+Time elapsed:  0.601 0.016 0.617 0 0
+> grDevices::dev.off()
-> ###
+null device
-> ### Local variables: ***
-> ### mode: outline-minor ***
+> ###
-> ### outline-regexp: "\\(> \\)?### [*]+" ***
+> ### Local variables: ***
-> ### End: ***
+> ### mode: outline-minor ***
-> quit('no')
+> ### outline-regexp: "\\(> \\)?### [*]+" ***
+> ### End: ***
+> quit('no')

The R Project SVN R

(root)/branches/R-exp-R5/tests/Examples/tools-Ex.Rout.save @ 63243 – Rev 52288 → 52291