This is an automated email from the git hooks/post-receive script. albac-guest pushed a commit to branch master in repository r-cran-rngtools.
commit 0d0dabd8cd921918b01a66213d4c28496333bd82 Author: Alba Crespi <[email protected]> Date: Tue Jul 5 11:16:16 2016 +0200 added debian/* --- debian/README.test | 8 + debian/changelog | 5 + debian/compat | 1 + debian/control | 26 ++++ debian/copyright | 36 +++++ debian/docs | 3 + debian/r-cran-rngtools.debhelper.log | 4 + debian/r-cran-rngtools.substvars | 1 + .../usr/lib/R/site-library/rngtools/DESCRIPTION | 25 ++++ .../usr/lib/R/site-library/rngtools/INDEX | 8 + .../usr/lib/R/site-library/rngtools/Meta/Rd.rds | Bin 0 -> 625 bytes .../lib/R/site-library/rngtools/Meta/hsearch.rds | Bin 0 -> 661 bytes .../usr/lib/R/site-library/rngtools/Meta/links.rds | Bin 0 -> 351 bytes .../lib/R/site-library/rngtools/Meta/nsInfo.rds | Bin 0 -> 312 bytes .../lib/R/site-library/rngtools/Meta/package.rds | Bin 0 -> 1057 bytes .../lib/R/site-library/rngtools/Meta/vignette.rds | Bin 0 -> 209 bytes .../usr/lib/R/site-library/rngtools/NAMESPACE | 23 +++ .../usr/lib/R/site-library/rngtools/R/rngtools | 27 ++++ .../usr/lib/R/site-library/rngtools/R/rngtools.rdb | Bin 0 -> 19127 bytes .../usr/lib/R/site-library/rngtools/R/rngtools.rdx | Bin 0 -> 682 bytes .../usr/lib/R/site-library/rngtools/doc/index.html | 28 ++++ .../site-library/rngtools/doc/rngtools-unitTests.R | 9 ++ .../rngtools/doc/rngtools-unitTests.Rnw | 80 ++++++++++ .../rngtools/doc/rngtools-unitTests.pdf | Bin 0 -> 99069 bytes .../usr/lib/R/site-library/rngtools/help/AnIndex | 31 ++++ .../lib/R/site-library/rngtools/help/aliases.rds | Bin 0 -> 320 bytes .../usr/lib/R/site-library/rngtools/help/paths.rds | Bin 0 -> 168 bytes .../lib/R/site-library/rngtools/help/rngtools.rdb | Bin 0 -> 23708 bytes .../lib/R/site-library/rngtools/help/rngtools.rdx | Bin 0 -> 291 bytes .../lib/R/site-library/rngtools/html/00Index.html | 79 ++++++++++ .../usr/lib/R/site-library/rngtools/html/R.css | 97 ++++++++++++ .../lib/R/site-library/rngtools/tests/runit.RNG.r | 133 +++++++++++++++++ .../R/site-library/rngtools/tests/runit.RNGseq.r | 162 +++++++++++++++++++++ .../R/site-library/rngtools/tests/runit.format.r | 103 +++++++++++++ debian/rules | 6 + debian/source/format | 1 + debian/tests/control | 3 + debian/tests/run-unit-test | 13 ++ debian/watch | 3 + 39 files changed, 915 insertions(+) diff --git a/debian/README.test b/debian/README.test new file mode 100644 index 0000000..ef34ccc --- /dev/null +++ b/debian/README.test @@ -0,0 +1,8 @@ +Notes on how this package can be tested. +──────────────────────────────────────── + +To run the unit tests provided by the package you can do + + sh run-unit-test + +in this directory. diff --git a/debian/changelog b/debian/changelog new file mode 100644 index 0000000..24a07e5 --- /dev/null +++ b/debian/changelog @@ -0,0 +1,5 @@ +r-cran-rngtools (1.2.4-1) UNRELEASED; urgency=medium + + * Initial release. (Closes: #829502) + + -- Alba Crespi <[email protected]> Sun, 03 Jul 2016 22:30:22 +0200 diff --git a/debian/compat b/debian/compat new file mode 100644 index 0000000..ec63514 --- /dev/null +++ b/debian/compat @@ -0,0 +1 @@ +9 diff --git a/debian/control b/debian/control new file mode 100644 index 0000000..cfb9ea3 --- /dev/null +++ b/debian/control @@ -0,0 +1,26 @@ +Source: r-cran-rngtools +Maintainer: Debian Med Packaging Team <[email protected]> +Uploaders: Alba Crespi <[email protected]> +Section: gnu-r +Priority: optional +Build-Depends: debhelper (>= 9), + r-base-dev (>= 3.0.0), + cdbs +Standards-Version: 3.9.8 +Vcs-Browser: https://anonscm.debian.org/cgit/debian-med/r-cran-rngtools.git +Vcs-Git: https://anonscm.debian.org/git/debian-med/r-cran-rngtools.git +Homepage: https://cran.r-project.org/web/packages/rngtools/ + +Package: r-cran-rngtools +Architecture: any +Depends: ${shlibs:Depends}, + ${misc:Depends}, + ${R:Depends}, + r-cran-pkgmaker (>= 0.20) +Description: GNU R package for random number generators. + This package contains a set of functions + for working with Random Number Generators (RNGs). In particular, it + defines a generic S4 framework for getting/setting the current RNG, + or RNG data that are embedded into objects for reproducibility. + Notably, convenient default methods greatly facilitate the way current + RNG settings can be changed. diff --git a/debian/copyright b/debian/copyright new file mode 100644 index 0000000..239e732 --- /dev/null +++ b/debian/copyright @@ -0,0 +1,36 @@ +Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/ +Upstream-Name: rngtools +Source: https://cran.r-project.org/web/packages/rngtools/ + +Files: * +Copyright: 2009-2012 Renaud Gaujoux <[email protected]> +License: GPL-3.0+ + +Files: vignettes/abbrvnat.bst +Copyright: 1993-2005 Patrick W Daly +License: LPPL-1+ + This program can be redistributed and/or modified under the terms of the + LaTeX Project Public License Distributed from CTAN archives in directory + macros/latex/base/lppl.txt; either version 1 of the License, or any later + version. + +Files: debian/* +Copyright: 2015 Alba Crespi <[email protected]> +License: GPL-2.0+ + +License: GPL-2.0+ + This package is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. + . + This package is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + . + You should have received a copy of the GNU General Public License + along with this program. If not, see <http://www.gnu.org/licenses/> + . + On Debian systems, the complete text of the GNU General + Public License version 2 can be found in "/usr/share/common-licenses/GPL-2". diff --git a/debian/docs b/debian/docs new file mode 100644 index 0000000..960011c --- /dev/null +++ b/debian/docs @@ -0,0 +1,3 @@ +tests +debian/README.test +debian/tests/run-unit-test diff --git a/debian/r-cran-rngtools.debhelper.log b/debian/r-cran-rngtools.debhelper.log new file mode 100644 index 0000000..2033868 --- /dev/null +++ b/debian/r-cran-rngtools.debhelper.log @@ -0,0 +1,4 @@ +dh_prep +dh_installdirs +dh_installdirs +dh_installdirs diff --git a/debian/r-cran-rngtools.substvars b/debian/r-cran-rngtools.substvars new file mode 100644 index 0000000..d8ddfe3 --- /dev/null +++ b/debian/r-cran-rngtools.substvars @@ -0,0 +1 @@ +R:Depends=r-base-core (>= 3.1.1-1) diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/DESCRIPTION b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/DESCRIPTION new file mode 100644 index 0000000..d61bf88 --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/DESCRIPTION @@ -0,0 +1,25 @@ +Package: rngtools +Maintainer: Renaud Gaujoux <[email protected]> +Author: Renaud Gaujoux +Version: 1.2.4 +License: GPL-3 +Title: Utility functions for working with Random Number Generators +Description: This package contains a set of functions for working with + Random Number Generators (RNGs). In particular, it defines a generic + S4 framework for getting/setting the current RNG, or RNG data + that are embedded into objects for reproducibility. + Notably, convenient default methods greatly facilitate the way current + RNG settings can be changed. +URL: https://renozao.github.io/rngtools +BugReports: http://github.com/renozao/rngtools/issues +SCM: github:renozao, r-forge +Depends: R (>= 3.0.0), methods, pkgmaker (>= 0.20) +Imports: stringr, digest +Suggests: parallel, RUnit, knitr +Collate: 'rngtools-package.r' 'format.R' 'RNG.R' 'RNGseq.R' +VignetteBuilder: knitr +Packaged: 2014-03-06 13:11:11 UTC; renaud +NeedsCompilation: no +Repository: CRAN +Date/Publication: 2014-03-06 22:18:10 +Built: R 3.3.0; ; 2016-07-04 18:20:17 UTC; unix diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/INDEX b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/INDEX new file mode 100644 index 0000000..33481fb --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/INDEX @@ -0,0 +1,8 @@ +RNGseed Directly Getting or Setting the RNG Seed +RNGseq Generate Sequence of Random Streams +RNGstr Formatting RNG Information +checkRNG Checking RNG Differences in Unit Tests +getRNG Getting/Setting RNGs +rng.equal Comparing RNG Settings +rngtools Utility functions for working with Random + Number Generators diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/Rd.rds b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/Rd.rds new file mode 100644 index 0000000..c0ebb78 Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/Rd.rds differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/hsearch.rds b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/hsearch.rds new file mode 100644 index 0000000..3cc75b7 Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/hsearch.rds differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/links.rds b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/links.rds new file mode 100644 index 0000000..61d8a1f Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/links.rds differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/nsInfo.rds b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/nsInfo.rds new file mode 100644 index 0000000..c483acf Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/nsInfo.rds differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/package.rds b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/package.rds new file mode 100644 index 0000000..3c39793 Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/package.rds differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/vignette.rds b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/vignette.rds new file mode 100644 index 0000000..dd85a43 Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/Meta/vignette.rds differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/NAMESPACE b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/NAMESPACE new file mode 100644 index 0000000..0dc79ce --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/NAMESPACE @@ -0,0 +1,23 @@ +export(.getRNG) +export(.setRNG) +export(RNGdigest) +export(RNGinfo) +export(RNGrecovery) +export(RNGseed) +export(RNGseq) +export(RNGseq_seed) +export(RNGstr) +export(RNGtype) +export(checkRNG) +export(getRNG) +export(getRNG1) +export(hasRNG) +export(nextRNG) +export(rng.equal) +export(rng1.equal) +export(setRNG) +export(showRNG) +import(digest) +import(methods) +import(pkgmaker) +import(stringr) diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools new file mode 100644 index 0000000..3b65e3c --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools @@ -0,0 +1,27 @@ +# File share/R/nspackloader.R +# Part of the R package, http://www.R-project.org +# +# Copyright (C) 1995-2012 The R Core Team +# +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# A copy of the GNU General Public License is available at +# http://www.r-project.org/Licenses/ + +local({ + info <- loadingNamespaceInfo() + pkg <- info$pkgname + ns <- .getNamespace(as.name(pkg)) + if (is.null(ns)) + stop("cannot find namespace environment for ", pkg, domain = NA); + dbbase <- file.path(info$libname, pkg, "R", pkg) + lazyLoad(dbbase, ns, filter = function(n) n != ".__NAMESPACE__.") +}) diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools.rdb b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools.rdb new file mode 100644 index 0000000..132599f Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools.rdb differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools.rdx b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools.rdx new file mode 100644 index 0000000..a7f5d12 Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/R/rngtools.rdx differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/index.html b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/index.html new file mode 100644 index 0000000..b30f527 --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/index.html @@ -0,0 +1,28 @@ +<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> +<html xmlns="http://www.w3.org/1999/xhtml"> +<head><title>R: Vignettes and other documentation</title> +<meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> +<link rel="stylesheet" type="text/css" href="/doc/html/R.css" /> +</head><body> +<h1> Vignettes and other documentation +<img class="toplogo" src="/doc/html/Rlogo.svg" alt="[R logo]" /> +</h1> +<hr/> +<div style="text-align: center;"> +<a href="/doc/html/index.html"><img class="arrow" src="/doc/html/up.jpg" alt="[Top]" /></a> +</div> +<h2>Vignettes from package 'rngtools'</h2> +<table width="100%"> +<col style="width: 22%;" /> +<col style="width: 2%;" /> +<col style="width: 50%;" /> +<col style="width: 8%;" /> +<col style="width: 8%;" /> +<col style="width: 8%;" /> +<tr><td style="text-align: right; vertical-align: top;"><a href="../../../library/rngtools/doc/rngtools-unitTests.pdf">rngtools::rngtools-unitTests</a></td> +<td></td><td valign="top">rngtools-unitTests</td> +<td valign="top"><a href="../../../library/rngtools/doc/rngtools-unitTests.pdf">PDF</a></td> +<td valign="top"><a href="../../../library/rngtools/doc/rngtools-unitTests.Rnw">source</a></td> +<td valign="top" style="white-space: nowrap"><a href="../../../library/rngtools/doc/rngtools-unitTests.R">R code</a></td></tr> +</table> +</body></html> diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.R b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.R new file mode 100644 index 0000000..e66beab --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.R @@ -0,0 +1,9 @@ + +## ----setup, include=FALSE------------------------------------------------ +pkg <- 'rngtools' +require( pkg, character.only=TRUE ) +prettyVersion <- packageDescription(pkg)$Version +prettyDate <- format(Sys.Date(), '%B %e, %Y') +authors <- packageDescription(pkg)$Author + + diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.Rnw b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.Rnw new file mode 100644 index 0000000..ff4e04d --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.Rnw @@ -0,0 +1,80 @@ + +\documentclass[10pt]{article} +%\VignetteDepends{knitr} +%\VignetteIndexEntry{rngtools-unitTests} +%\VignetteCompiler{knitr} +%\VignetteEngine{knitr::knitr} +\usepackage{vmargin} +\setmargrb{0.75in}{0.75in}{0.75in}{0.75in} + +<<setup, include=FALSE>>= +pkg <- 'rngtools' +require( pkg, character.only=TRUE ) +prettyVersion <- packageDescription(pkg)$Version +prettyDate <- format(Sys.Date(), '%B %e, %Y') +authors <- packageDescription(pkg)$Author +@ + +\usepackage[colorlinks]{hyperref} +\author{\Sexpr{authors}} +\title{\texttt{\Sexpr{pkg}}: Unit testing results\footnote{Vignette computed on Thu Mar 6 11:45:50 2014}} +\date{\texttt{\Sexpr{pkg}} version \Sexpr{prettyVersion} as of \Sexpr{prettyDate}} +\begin{document} +\maketitle + +\section{Details} +\begin{verbatim} + +RUNIT TEST PROTOCOL -- Thu Mar 6 11:45:50 2014 +*********************************************** +Number of test functions: 6 +Number of errors: 0 +Number of failures: 0 + + +1 Test Suite : +package:rngtools - 6 test functions, 0 errors, 0 failures + + + +Details +*************************** +Test Suite: package:rngtools +Test function regexp: ^test. +Test file regexp: ^runit.*.[rR]$ +Involved directory: +/tmp/Rpkglib_51e6234a85cc/rngtools/tests +--------------------------- +Test file: /tmp/Rpkglib_51e6234a85cc/rngtools/tests/runit.format.r +test.RNGdigest: (30 checks) ... OK (0.01 seconds) +test.RNGtype: (22 checks) ... OK (0.01 seconds) +--------------------------- +Test file: /tmp/Rpkglib_51e6234a85cc/rngtools/tests/runit.RNG.r +test.getRNG: (18 checks) ... OK (0 seconds) +test.setRNG: (34 checks) ... OK (0.01 seconds) +--------------------------- +Test file: /tmp/Rpkglib_51e6234a85cc/rngtools/tests/runit.RNGseq.r +test.RNGseq: (51 checks) ... OK (0.01 seconds) +test.RNGseq_seed: (75 checks) ... OK (0 seconds) + +Total execution time +*************************** + user system elapsed + 0.234 0.001 0.234 + +\end{verbatim} + +\section*{Session Information} +\begin{itemize}\raggedright + \item R Under development (unstable) (2014-03-02 r65102), \verb|x86_64-unknown-linux-gnu| + \item Locale: \verb|LC_CTYPE=en_US.UTF-8|, \verb|LC_NUMERIC=C|, \verb|LC_TIME=en_US.UTF-8|, \verb|LC_COLLATE=en_US.UTF-8|, \verb|LC_MONETARY=en_US.UTF-8|, \verb|LC_MESSAGES=en_US.UTF-8|, \verb|LC_PAPER=en_US.UTF-8|, \verb|LC_NAME=C|, \verb|LC_ADDRESS=C|, \verb|LC_TELEPHONE=C|, \verb|LC_MEASUREMENT=en_US.UTF-8|, \verb|LC_IDENTIFICATION=C| + \item Base packages: base, datasets, graphics, grDevices, methods, + parallel, stats, utils + \item Other packages: pkgmaker~0.20, registry~0.2, rngtools~1.2.4, + RUnit~0.4.26, stringr~0.6.2 + \item Loaded via a namespace (and not attached): codetools~0.2-8, + digest~0.6.4, tools~3.1.0, xtable~1.7-1 +\end{itemize} + +\end{document} + diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.pdf b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.pdf new file mode 100644 index 0000000..15f40de Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/doc/rngtools-unitTests.pdf differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/AnIndex b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/AnIndex new file mode 100644 index 0000000..37d7bbd --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/AnIndex @@ -0,0 +1,31 @@ +rngtools-package rngtools +.getRNG rng +.getRNG,ANY-method rng +.getRNG,list-method rng +.getRNG,missing-method rng +.getRNG,numeric-method rng +.getRNG-methods rng +.setRNG rng +.setRNG,character-method rng +.setRNG,numeric-method rng +.setRNG-methods rng +checkRNG uchecks +getRNG rng +getRNG1 rng +getRNG1,ANY-method rng +getRNG1-methods rng +hasRNG rng +nextRNG rng +rng.equal rngcmp +rng1.equal rngcmp +RNGdigest RNGstr +RNGinfo RNGstr +RNGrecovery RNGseed +RNGseed RNGseed +RNGseq RNGseq +RNGseq_seed RNGseq +RNGstr RNGstr +rngtools rngtools +RNGtype RNGstr +setRNG rng +showRNG RNGstr diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/aliases.rds b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/aliases.rds new file mode 100644 index 0000000..abedd7a Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/aliases.rds differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/paths.rds b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/paths.rds new file mode 100644 index 0000000..2ff4b4b Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/paths.rds differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/rngtools.rdb b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/rngtools.rdb new file mode 100644 index 0000000..5541437 Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/rngtools.rdb differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/rngtools.rdx b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/rngtools.rdx new file mode 100644 index 0000000..fe2a5f9 Binary files /dev/null and b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/help/rngtools.rdx differ diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/html/00Index.html b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/html/00Index.html new file mode 100644 index 0000000..cd2fabd --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/html/00Index.html @@ -0,0 +1,79 @@ +<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> +<html xmlns="http://www.w3.org/1999/xhtml"> +<head><title>R: Utility functions for working with Random Number Generators</title> +<meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> +<link rel="stylesheet" type="text/css" href="R.css" /> +</head><body> +<h1> Utility functions for working with Random Number Generators +<img class="toplogo" src="../../../doc/html/Rlogo.svg" alt="[R logo]" /> +</h1> +<hr/> +<div style="text-align: center;"> +<a href="../../../doc/html/packages.html"><img class="arrow" src="../../../doc/html/left.jpg" alt="[Up]" /></a> +<a href="../../../doc/html/index.html"><img class="arrow" src="../../../doc/html/up.jpg" alt="[Top]" /></a> +</div><h2>Documentation for package ‘rngtools’ version 1.2.4</h2> + +<ul><li><a href="../DESCRIPTION">DESCRIPTION file</a>.</li> +<li><a href="../doc/index.html">User guides, package vignettes and other documentation.</a></li> +</ul> + +<h2>Help Pages</h2> + + +<table width="100%"> +<tr><td style="width: 25%;"><a href="rngtools.html">rngtools-package</a></td> +<td>Utility functions for working with Random Number Generators</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">.getRNG</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">.getRNG-method</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">.getRNG-methods</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">.setRNG</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">.setRNG-method</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">.setRNG-methods</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="uchecks.html">checkRNG</a></td> +<td>Checking RNG Differences in Unit Tests</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">getRNG</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">getRNG1</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">getRNG1-method</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">getRNG1-methods</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">hasRNG</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">nextRNG</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="rngcmp.html">rng.equal</a></td> +<td>Comparing RNG Settings</td></tr> +<tr><td style="width: 25%;"><a href="rngcmp.html">rng1.equal</a></td> +<td>Comparing RNG Settings</td></tr> +<tr><td style="width: 25%;"><a href="RNGstr.html">RNGdigest</a></td> +<td>Formatting RNG Information</td></tr> +<tr><td style="width: 25%;"><a href="RNGstr.html">RNGinfo</a></td> +<td>Formatting RNG Information</td></tr> +<tr><td style="width: 25%;"><a href="RNGseed.html">RNGrecovery</a></td> +<td>Directly Getting or Setting the RNG Seed</td></tr> +<tr><td style="width: 25%;"><a href="RNGseed.html">RNGseed</a></td> +<td>Directly Getting or Setting the RNG Seed</td></tr> +<tr><td style="width: 25%;"><a href="RNGseq.html">RNGseq</a></td> +<td>Generate Sequence of Random Streams</td></tr> +<tr><td style="width: 25%;"><a href="RNGseq.html">RNGseq_seed</a></td> +<td>Generate Sequence of Random Streams</td></tr> +<tr><td style="width: 25%;"><a href="RNGstr.html">RNGstr</a></td> +<td>Formatting RNG Information</td></tr> +<tr><td style="width: 25%;"><a href="rngtools.html">rngtools</a></td> +<td>Utility functions for working with Random Number Generators</td></tr> +<tr><td style="width: 25%;"><a href="RNGstr.html">RNGtype</a></td> +<td>Formatting RNG Information</td></tr> +<tr><td style="width: 25%;"><a href="rng.html">setRNG</a></td> +<td>Getting/Setting RNGs</td></tr> +<tr><td style="width: 25%;"><a href="RNGstr.html">showRNG</a></td> +<td>Formatting RNG Information</td></tr> +</table> +</body></html> diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/html/R.css b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/html/R.css new file mode 100644 index 0000000..f10f5ea --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/html/R.css @@ -0,0 +1,97 @@ +body { + background: white; + color: black; +} + +a:link { + background: white; + color: blue; +} + +a:visited { + background: white; + color: rgb(50%, 0%, 50%); +} + +h1 { + background: white; + color: rgb(55%, 55%, 55%); + font-family: monospace; + font-size: x-large; + text-align: center; +} + +h2 { + background: white; + color: rgb(40%, 40%, 40%); + font-family: monospace; + font-size: large; + text-align: center; +} + +h3 { + background: white; + color: rgb(40%, 40%, 40%); + font-family: monospace; + font-size: large; +} + +h4 { + background: white; + color: rgb(40%, 40%, 40%); + font-family: monospace; + font-style: italic; + font-size: large; +} + +h5 { + background: white; + color: rgb(40%, 40%, 40%); + font-family: monospace; +} + +h6 { + background: white; + color: rgb(40%, 40%, 40%); + font-family: monospace; + font-style: italic; +} + +img.toplogo { + width: 4em; + vertical-align: middle; +} + +img.arrow { + width: 30px; + height: 30px; + border: 0; +} + +span.acronym { + font-size: small; +} + +span.env { + font-family: monospace; +} + +span.file { + font-family: monospace; +} + +span.option{ + font-family: monospace; +} + +span.pkg { + font-weight: bold; +} + +span.samp{ + font-family: monospace; +} + +div.vignettes a:hover { + background: rgb(85%, 85%, 85%); +} diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.RNG.r b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.RNG.r new file mode 100644 index 0000000..fddb18e --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.RNG.r @@ -0,0 +1,133 @@ +# Unit test for getRNG +# +# Author: Renaud Gaujoux +############################################################################### + +library(stringr) + +test.getRNG <- function(){ + + RNGkind('default', 'default') + on.exit( RNGrecovery() ) + + checker <- function(x, y, ..., msg=NULL, drawRNG=TRUE){ + + if( drawRNG ) runif(10) + fn <- getRNG + oldRNG <- RNGseed() + if( !missing(x) ){ + d <- fn(x, ...) + cl <- str_c(class(x), '(', length(x), ')') + }else{ + d <- fn() + cl <- 'MISSING' + } + newRNG <- RNGseed() + .msg <- function(x) paste(cl, ':', x, '[', msg, ']') + checkIdentical(oldRNG, newRNG, .msg("does not change RNG")) + checkIdentical(d, y, .msg("result is correct") ) + } + + set.seed(123456) + seed123456 <- .Random.seed + checker(, seed123456, msg="No arguments: returns .Random.seed", drawRNG=FALSE) + checker(123456, seed123456, msg="Single numeric argument: returns .Random.seed as it would be after setting the seed") + checker(123456, 123456, num.ok=TRUE, msg="Single numeric argument + num.ok: returns argument unchanged") + checker(.Random.seed, .Random.seed, msg="Integer seed argument: returns its argument unchanged") + checker(as.numeric(.Random.seed), .Random.seed, msg="Numeric seed argument: returns its argument as an integer vector") + checker(2:3, 2:3, msg="Integer INVALID seed vector argument: returns its argument unchanged") + checker(c(2,3), c(2L,3L), msg="Numeric INVALID seed vector argument: returns its argument as an integer vector") + checker(1L, 1L, msg="Single integer = Encoded RNG kind: returns it unchanged") + checker(1000L, 1000L, msg="Invalid single integer = Encoded RNG kind: returns it unchanged") + +} + +test.setRNG <- function(){ + + RNGkind('default', 'default') + on.exit( RNGrecovery() ) + + checker <- function(x, y, tset, drawRNG=TRUE){ + + on.exit( RNGrecovery() ) + + if( drawRNG ) runif(10) + oldRNG <- RNGseed() + d <- force(x) + newRNG <- RNGseed() + + msg <- function(x, ...) paste(tset, ':', ...) + checkTrue(!identical(oldRNG, newRNG), msg("changes RNG")) + checkIdentical(getRNG(), y, msg("RNG is correctly set") ) + checkIdentical(d, oldRNG, msg("returns old RNG") ) + } + + set.seed(123456) + refseed <- .Random.seed + checker(setRNG(123456), refseed, "Single numeric: sets current RNG with seed") + + # setting kind with a character string + set.seed(123) + RNGkind('Mar') + refseed <- .Random.seed + RNGrecovery() + set.seed(123) + checker(setRNG('Mar'), refseed, "Single character: change RNG kind", drawRNG=FALSE) + + # setting kind with a character string + set.seed(123) + RNGkind('Mar', 'Ahrens') + refseed <- .Random.seed + RNGrecovery() + set.seed(123) + checker(setRNG('Mar', 'Ahrens'), refseed, "Two character strings: change RNG kind and normal kind", drawRNG=FALSE) + RNGrecovery() + set.seed(123) + checker(setRNG(c('Mar', 'Ahrens')), refseed, "2-long character vector: change RNG kind and normal kind", drawRNG=FALSE) + + # setting kind + set.seed(123456, kind='Mar') + refseed <- .Random.seed + checker(setRNG(123456, kind='Mar'), refseed, "Single numeric + kind: change RNG kind + set seed") + + # setting Nkind + set.seed(123456, normal.kind='Ahrens') + refseed <- .Random.seed + checker(setRNG(123456, normal.kind='Ahrens'), refseed + , "Single numeric + normal.kind: change RNG normal kind + set seed") + + # setting kind and Nkind + set.seed(123456, kind='Mar', normal.kind='Ahrens') + refseed <- .Random.seed + checker(setRNG(123456, kind='Mar', normal.kind='Ahrens'), refseed + , "Single numeric + kind + normal.kind: change RNG all kinds + set seed") + + # with seed length > 1 + refseed <- as.integer(c(201, 0, 0)) + checker(setRNG(refseed), refseed, "numeric vector: directly set seed") + + refseed <- .Random.seed + checkException( setRNG(2:3), "numeric vector: throws an error if invalid value for .Random.seed") + checkIdentical( .Random.seed, refseed, ".Random.seed is not changed in case of an error in setRNG") + + oldRNG <- getRNG() + checkException(setRNG(1234L), "Error with invalid integer seed") + checkIdentical(oldRNG, getRNG(), "RNG still valid after error") + checkException(setRNG(123L), "Error with invalid RNG kind") + checkIdentical(oldRNG, getRNG(), "RNG still valid after error") + + # changes in R >= 3.0.2: invalid seeds only throw warning + if( testRversion('> 3.0.1') ){ + oldRNG <- getRNG() + checkWarning(setRNG(1234L, check = FALSE), "\\.Random\\.seed.* is not .* valid" + , "Invalid integer kind: Warning only if check = FALSE") + checkIdentical(1234L, getRNG(), "RNG has new invalid integer value") + setRNG(oldRNG) + checkWarning(setRNG(123L, check = FALSE), "\\.Random\\.seed.* is not .* valid" + , "Invalid kind: Warning only if check = FALSE") + checkIdentical(123L, getRNG(), "RNG has new invalid RNG kind") + + } + +} + diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.RNGseq.r b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.RNGseq.r new file mode 100644 index 0000000..674012e --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.RNGseq.r @@ -0,0 +1,162 @@ +# Unit tets for RNGseq +# +# Author: Renaud Gaujoux +############################################################################### + +library(parallel) + +test.RNGseq_seed <- function(){ + + # actual testing function + .test_loc <- function(.msg, ..., .change=FALSE){ + msg <- function(...) paste(.msg, ':', ...) + os <- RNGseed() + on.exit(RNGseed(os)) + s <- RNGseq_seed(...) + checkTrue(length(s) == 7L && s[1] %% 100 == 7L, msg("RNGseq_seed returns a value of .Random.seed for L'Ecuyer-CMRG")) + checkIdentical(RNGseed()[1], os[1], msg("RNGseq_seed does not change the type of RNG")) + + if( !.change ) checkIdentical(RNGseed(), os, msg("RNGseq_seed does not change the value of .Random.seed")) + else checkTrue( !identical(RNGseed(), os), msg("RNGseq_seed changes the value of .Random.seed")) + s + } + + # test in two RNG settings: default and L'Ecuyer + .test <- function(.msg, ..., ss=NULL, .change=FALSE, Dchange=.change, Lchange=.change){ + os <- RNGseed() + on.exit(RNGseed(os)) + + # default RNG + RNGkind('default') + if( !is.null(ss) ) set.seed(ss) + s1 <- .test_loc(paste(.msg, '- default'), ..., .change=Dchange) + + RNGkind("L'Ecuyer") + if( !is.null(ss) ) set.seed(ss) + s2 <- .test_loc(paste(.msg, "- CMRG"), ..., .change=Lchange) + + list(s1, s2) + } + + os <- RNGseed() + on.exit(RNGseed(os)) + + RNGkind('default', 'default') + + # test different arguments + s1 <- .test("seed=missing", ss=1, Dchange=TRUE, Lchange=FALSE) + runif(10) + s2 <- .test("seed=NULL", NULL, ss=1, Dchange=TRUE, Lchange=FALSE) + checkIdentical(s1, s2, "set.seed(1) + seed=missing and seed=NULL return identical results") + + # doRNG seed with single numeric + runif(10) + s3 <- .test("seed=single numeric", 1) + checkIdentical(s1[[1]], s3[[1]], "v1.4 - set.seed(1) + seed=missing and seed=1 return identical results when current RNG is NOT CMRG") + checkIdentical(s1[[2]], s3[[2]], "v1.4 - set.seed(1) + seed=missing and seed=1 return identical results when current RNG is CMRG") + checkTrue( !identical(s1[[1]], s1[[2]]), "v1.4 - set.seed(1) + seed=missing return NON identical results in different RNG settings") + checkTrue( !identical(s3[[1]], s3[[2]]), "v1.4 - seed=num return NON identical results in different RNG settings") + + # version < 1.4 +# doRNGversion("1.3.9999") + s1 <- .test("v1.3 - seed=missing", ss=1, Dchange=TRUE, Lchange=TRUE, version=1) + s3 <- .test("v1.3 - seed=single numeric", 1, version=1) + checkIdentical(s1[[1]], s3[[1]], "v1.3 - set.seed(1) + seed=missing and seed=1 return identical results when current RNG is NOT CMRG") + checkTrue( !identical(s1[[2]], s3[[2]]), "v1.3 - set.seed(1) + seed=missing and seed=1 return NON identical results when current RNG is CMRG") + checkTrue( !identical(s1[[1]], s1[[2]]), "v1.3 - set.seed(1) + seed=missing return NON identical results in different RNG settings") + checkTrue( !identical(s3[[1]], s3[[2]]), "v1.4 - seed=num return NON identical results in different RNG settings") +# doRNGversion(NULL) + ## + + .test("seed=single integer", 10L) + # directly set doRNG seed with a 6-length + .test("seed=6-length integer", 1:6) + .test("seed=6-length numeric", as.numeric(1:6)) + s <- 1:6 + checkIdentical(RNGseq_seed(s)[2:7], s, "RNGseq_seed(6-length) returns stream to the given value") + # directly set doRNG seed with a full 7-length .Random.seed + .test("seed=7-length integer", c(407L,1:6)) + .test("seed=7-length numeric", as.numeric(c(107L,1:6))) + s <- c(407L,1:6) + checkIdentical(RNGseq_seed(s), s, "RNGseq_seed(7-length) returns complete seed with the given value") + + # errors + os <- RNGseed() + checkException(RNGseq_seed(NA), "seed=NA throws an exception") + checkIdentical(os, RNGseed(), "RNGseq_seed(NA) does not change the value of .Random.seed [error]") + + # Current CMRG is L'Ecuyer + RNGkind("L'Ecuyer") + set.seed(456) + s <- RNGseed() + r <- RNGseq_seed(NULL) + checkIdentical(s, r, "Current is CMRG: seed=NULL return current stream") + runif(10) + checkIdentical(s, RNGseq_seed(456), "Current is CMRG: seed=numeric return stream seeded with value") + +} + +test.RNGseq <- function(){ + + os <- RNGseed() + on.exit(RNGseed(os)) + + # actual testing function + .test_loc <- function(.msg, n, ..., .list=TRUE, .change=FALSE){ + msg <- function(...) paste(.msg, ':', ...) + os <- RNGseed() + on.exit(RNGseed(os)) + + s <- RNGseq(n, ...) + + if( !.change ) checkIdentical(RNGseed(), os, msg("the value of .Random.seed is not changed")) + else checkTrue( !identical(RNGseed(), os), msg("the value of .Random.seed does change")) + + if( .list ) checkTrue(is.list(s), msg("result is a list")) + else{ + checkTrue(is.integer(s), msg("result is an integer vector")) + s <- list(s) + } + + checkTrue(length(s) == n, msg("result has correct length")) + checkTrue(all(sapply(s, length) == 7L), msg("each element has length 7")) + checkTrue(all(sapply(s, function(x) x[1] %% 100) == 7L), msg("each element has correct RNG kind")) + s + } + + .test <- function(msg, n, ...){ + set.seed(1) + s1 <- .test_loc(paste(msg, '- no seed'), n, ..., .change=TRUE) + runif(1) + s2 <- .test_loc(paste(msg, '- seed=1'), n, 1, ..., .change=FALSE) + #checkIdentical(s1, s2, paste(msg, " - set.seed(1) + no seed is identical to seed=1")) + .test_loc(paste(msg, '- seed=1:6'), n, 1:6, ...) + } + .test("n=1", 1, .list=FALSE) + .test("n=2", 2) + .test("n=5", 5) + + # with full list + s <- RNGseq(3) + checkIdentical(RNGseq(length(s), s), s, "If passing a complete list: returns the list itself") + s3 <- RNGseq(5) + s <- structure(s, rng=s3) + checkIdentical(RNGseq(length(s3), s), s3, "If passing a complete list in rng S3 slot: returns the complete slot") + # + + # Current RNG is CMRG + set.seed(456, "L'Ec") + s <- .Random.seed + ref <- list(s, nextRNGStream(s), nextRNGStream(nextRNGStream(s))) + rs <- RNGseq(3, 456) + checkIdentical(rs, ref, "Current RNG is CMRG: RNGseq(n, num) returns RNG streams that start with stream as set.seed") + checkIdentical(s, .Random.seed, "Current RNG is CMRG: RNGseq(n, num) did not change random seed") + + runif(10) + s <- .Random.seed + ref <- list(s, nextRNGStream(s), nextRNGStream(nextRNGStream(s))) + rs2 <- RNGseq(3) + checkIdentical(rs2, ref, "Current RNG is CMRG: RNGseq(n) returns RNG streams that start with current stream") + checkIdentical(.Random.seed, nextRNGStream(tail(rs2,1)[[1]]), "Current RNG is CMRG: RNGseq(n) changes current random seed to next stream of last stream in sequence") + +} diff --git a/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.format.r b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.format.r new file mode 100644 index 0000000..7e94f91 --- /dev/null +++ b/debian/r-cran-rngtools/usr/lib/R/site-library/rngtools/tests/runit.format.r @@ -0,0 +1,103 @@ +# Unit tests for RNG formatting functions +# +# Author: Renaud Gaujoux +############################################################################### + +library(stringr) +library(pkgmaker) + +checkFun <- function(fn, name){ + + function(x, ...){ + + oldRNG <- RNGseed() + if( !missing(x) ){ + d <- fn(x) + obj <- getRNG(x) + cl <- class(x) + }else{ + d <- fn() + obj <- getRNG() + cl <- 'MISSING' + } + newRNG <- RNGseed() + msg <- function(x, ...) paste(name, '-', cl, ':', x, '[', ..., ']') + checkIdentical(oldRNG, newRNG, msg("does not change RNG", ...)) + + # + checkTrue( isString(d), msg("result is a character string", ...)) + checkIdentical(d, fn(obj), msg("digest is from the RNG setting", ...)) + + } +} + +test.RNGdigest <- function(){ + + RNGkind('default', 'default') + on.exit( RNGrecovery() ) + + fn <- c('RNGdigest', 'RNGstr') + sapply(fn, function(f){ + fn <- getFunction(f, where='package:rngtools') + checker <- checkFun(fn, f) + + checker() + checker(1234) + checker(1:3, 'Valid seed') + checker(2:3, 'Invalid seed') + x <- list(10, rng=c(401L, 1L, 1L)) + checker(x, 'list with rng slot') + + }) + TRUE +} + +checkRNGtype <- function(x, ..., expL=2L){ + + fn <- RNGtype + oldRNG <- getRNG() + if( !missing(x) ){ + d <- fn(x) + obj <- getRNG(x) + cl <- str_c(class(x), '(', length(x), ')') + }else{ + d <- fn() + obj <- getRNG() + cl <- 'MISSING' + } + newRNG <- getRNG() + msg <- function(x, ...) paste(cl, ':', x, '[', ..., ']') + checkIdentical(oldRNG, newRNG, msg("does not change RNG", ...)) + + # + checkTrue( is.character(d), msg("result is a character vector", ...) ) + checkIdentical( length(d), expL, msg("result has correct length (", expL, ")", ...) ) + +} + +test.RNGtype <- function(){ + + RNGkind('default', 'default') + on.exit( RNGrecovery() ) + checker <- checkRNGtype + + checker() + checker(1234, 'Valid single numeric seed') + checker(1:3, 'Valid seed') + checker(402L, 'Valid encoded kind') + checkTrue( !identical(RNGtype(402), RNGtype(402L)), "Single integer and real number does not give the same result") + x <- list(10, rng=c(401L, 1L, 1L)) + checker(x, 'list with rng slot') + + # errors + oldRNG <- getRNG() + checkException(RNGtype(2:3), "Error with invalid length seed") + checkIdentical(oldRNG, getRNG(), "RNG still valid after error") + # + + oldRNG <- getRNG() + checkException(RNGtype(123L), "Error with invalid RNG kind") + checkIdentical(oldRNG, getRNG(), "RNG still valid after error") + checkException(RNGtype(1234L), "Error with invalid RNG integer") + checkIdentical(oldRNG, getRNG(), "RNG still valid after error") +} diff --git a/debian/rules b/debian/rules new file mode 100755 index 0000000..70bae9d --- /dev/null +++ b/debian/rules @@ -0,0 +1,6 @@ +#!/usr/bin/make -f + +include /usr/share/R/debian/r-cran.mk + +install/$(package):: + chmod 644 $(debRlib)/$(cranName)/doc/rngtools.* diff --git a/debian/source/format b/debian/source/format new file mode 100644 index 0000000..163aaf8 --- /dev/null +++ b/debian/source/format @@ -0,0 +1 @@ +3.0 (quilt) diff --git a/debian/tests/control b/debian/tests/control new file mode 100644 index 0000000..d2aa55a --- /dev/null +++ b/debian/tests/control @@ -0,0 +1,3 @@ +Tests: run-unit-test +Depends: @ +Restrictions: allow-stderr diff --git a/debian/tests/run-unit-test b/debian/tests/run-unit-test new file mode 100644 index 0000000..fac0275 --- /dev/null +++ b/debian/tests/run-unit-test @@ -0,0 +1,13 @@ +#!/bin/sh -e + +oname=rngtools +pkg=r-cran-`echo $oname | tr '[A-Z]' '[a-z]'` + +if [ "$ADTTMP" = "" ] ; then + ADTTMP=`mktemp -d /tmp/${pkg}-test.XXXXXX` +fi +cd $ADTTMP +cp -a /usr/share/doc/${pkg}/tests/* $ADTTMP +LC_ALL=C R --no-save < doRUnit.R +rm -fr $ADTTMP/* + diff --git a/debian/watch b/debian/watch new file mode 100644 index 0000000..f28e408 --- /dev/null +++ b/debian/watch @@ -0,0 +1,3 @@ +version=3 +https://cran.r-project.org/src/contrib/rbgtools_([-0-9\.]*)\.tar\.gz + -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-med/r-cran-rngtools.git _______________________________________________ debian-med-commit mailing list [email protected] http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/debian-med-commit
