R Under development (unstable) (2023-11-16 r85542 ucrt) -- "Unsuffered Consequences" Copyright (C) 2023 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 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. 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. > library("R.utils") Loading required package: R.oo Loading required package: R.methodsS3 R.methodsS3 v1.8.2 (2022-06-13 22:00:14 UTC) successfully loaded. See ?R.methodsS3 for help. R.oo v1.25.0 (2022-06-12 02:20:02 UTC) successfully loaded. See ?R.oo for help. Attaching package: 'R.oo' The following object is masked from 'package:R.methodsS3': throw The following objects are masked from 'package:methods': getClasses, getMethods The following objects are masked from 'package:base': attach, detach, load, save R.utils v2.12.3 successfully loaded. See ?R.utils for help. Attaching package: 'R.utils' The following object is masked from 'package:utils': timestamp The following objects are masked from 'package:base': cat, commandArgs, getOption, isOpen, nullfile, parse, warnings > > opager <- options(pager=mpager) > > file <- system.file("DESCRIPTION", package="R.utils") > cat("Displaying: ", file, ":\n", sep="") Displaying: D:/RCompile/CRANincoming/R-devel/lib/R.utils/DESCRIPTION: > displayCode(file) =============================================================================== D:/RCompile/CRANincoming/R-devel/lib/R.utils/DESCRIPTION =============================================================================== 1|Package: R.utils 2|Version: 2.12.3 3|Depends: R (>= 2.14.0), R.oo 4|Imports: methods, utils, tools, R.methodsS3 5|Suggests: datasets, digest (>= 0.6.10) 6|Title: Various Programming Utilities 7|Authors@R: c(person("Henrik", "Bengtsson", role=c("aut", "cre", "cph"), 8| email = "henrikb@braju.com")) 9|Author: Henrik Bengtsson [aut, cre, cph] 10|Maintainer: Henrik Bengtsson 11|Description: Utility functions useful when programming and developing R pack |ages. 12|License: LGPL (>= 2.1) 13|LazyLoad: TRUE 14|URL: https://henrikbengtsson.github.io/R.utils/, 15| https://github.com/HenrikBengtsson/R.utils 16|BugReports: https://github.com/HenrikBengtsson/R.utils/issues 17|NeedsCompilation: no 18|Packaged: 2023-11-17 05:13:25 UTC; henrik 19|Built: R 4.4.0; ; 2023-11-17 07:44:19 UTC; windows > > file <- system.file("NEWS.md", package="R.utils") > cat("Displaying: ", file, ":\n", sep="") Displaying: D:/RCompile/CRANincoming/R-devel/lib/R.utils/NEWS.md: > displayCode(file, numerate=FALSE, lines=100:110, wrap=65) =============================================================================== D:/RCompile/CRANincoming/R-devel/lib/R.utils/NEWS.md =============================================================================== * `Arguments$getVector()` could produce an error on "argument is missing, with no default" while trying to signal an assertion error. * `intToHex()` and `intToOct()` would no longer pad with zero on recent R-devel (to become R 4.2.0) versions. # Version 2.10.1 [2020-08-25] > > file <- system.file("NEWS.md", package="R.utils") > cat("Displaying: ", file, ":\n", sep="") Displaying: D:/RCompile/CRANincoming/R-devel/lib/R.utils/NEWS.md: > displayCode(file, lines=100:110, wrap=65, highlight=c(101,104:108)) =============================================================================== D:/RCompile/CRANincoming/R-devel/lib/R.utils/NEWS.md =============================================================================== 100| *101| * `Arguments$getVector()` could produce an error on "argume |nt is 102| missing, with no default" while trying to signal an asser |tion 103| error. *104| *105| * `intToHex()` and `intToOct()` would no longer pad with ze |ro on *106| recent R-devel (to become R 4.2.0) versions. *107| *108| 109|# Version 2.10.1 [2020-08-25] 110| > > con <- file(file) > displayCode(con, lines=1:10) =============================================================================== D:/RCompile/CRANincoming/R-devel/lib/R.utils/NEWS.md =============================================================================== 1|# Version 2.12.3 [2022-11-16] 2| 3|## Documentation 4| 5| * Fix various Rd issues. 6| 7|## Miscellaneous 8| 9| * The unit tests on absolute and relative paths would fail on MS Windows 10| where the `HOME` folder was a subfolder directly under the drive, e.g. > > displayCode(file, lines=1:10, pager=mpager) =============================================================================== D:/RCompile/CRANincoming/R-devel/lib/R.utils/NEWS.md =============================================================================== 1|# Version 2.12.3 [2022-11-16] 2| 3|## Documentation 4| 5| * Fix various Rd issues. 6| 7|## Miscellaneous 8| 9| * The unit tests on absolute and relative paths would fail on MS Windows 10| where the `HOME` folder was a subfolder directly under the drive, e.g. > displayCode(file, lines=1:10, pager="mpager") Warning message: In file.show(tmpfile, title = pathname, delete.file = TRUE, pager = pager, : '"mpager"' not found > > > ## Exception handling > res <- try(displayCode(file, lines=-10:110), silent=TRUE) > stopifnot(inherits(res, "try-error")) > > res <- try(displayCode(file, wrap=integer(0)), silent=TRUE) > stopifnot(inherits(res, "try-error")) > > res <- try(displayCode(file, wrap=55:66), silent=TRUE) > stopifnot(inherits(res, "try-error")) > > res <- try(displayCode(2L), silent=TRUE) > stopifnot(inherits(res, "try-error")) > > options(opager) > > proc.time() user system elapsed 0.40 0.12 0.51