- toLatex.sessionInfo <-
- function(object, locale = TRUE, tzone = locale,
- RNG = !identical(object$RNGkind, .RNGdefaults),
- ...)
- {
- z <- c("\\begin{itemize}\\raggedright",
- paste0(" \\item ", object$R.version$version.string,
- ", \\verb|", object$R.version$platform, "|"),
- if(locale)
- paste0(" \\item Locale: \\verb|",
- gsub(";", "|, \\verb|", object$locale, fixed=TRUE), "|"),
- if(locale && !is.null(object$system.codepage) && object$system.codepage != object$codepage)
- paste0(" \\item System code page: \\verb|", object$system.codepage, "|"),
- if (tzone) paste0(" \\item Time zone: \\verb|", object$tzone, "|"),
- if (tzone) paste0(" \\item TZcode source: \\verb|", object$tzcode_type, "|"),
- paste0(" \\item Running under: \\verb|",
- gsub(";", "|, \\verb|", object$running, fixed=TRUE), "|"),
- if(RNG)
- paste0(" \\item Random number generation:"
- , " \\item RNG: \\verb|", object$RNGkind[1], "|"
This file has been truncated. show original