| Here is a list of package vignettes _possibly_ built with **knitr** on CRAN. | |
| ```{r fetch-pkgs, include=FALSE} | |
| pkgs = available.packages(contrib.url('https://cran.r-project.org', 'source')) | |
| deps = tools::package_dependencies('knitr', pkgs, which = 'all', reverse = TRUE)[['knitr']] | |
| deps = setdiff(deps, 'R.rsp') # packages that do not use knitr | |
| deps = sort(c(deps, 'knitr')) | |
| ``` | |
| ```{r vig-list, include=FALSE, echo=FALSE, cache=TRUE, cache.extra=deps, message=FALSE, error=FALSE} | |
| vigs = lapply(deps, function(pkg) { |
| #!/bin/sh | |
| # you can replace $HOME with any dir | |
| sed -i 's@\$TEXLIVEHOME@'"$HOME"'@' texlive.profile | |
| wget http://mirror.ctan.org/systems/texlive/tlnet/install-tl-unx.tar.gz | |
| tar zxf install-tl-unx.tar.gz | |
| ./install-tl*/install-tl -profile texlive.profile | |
| # texlive.tar.gz is a portable and full TeXLive package | |
| tar zcf texlive.tar.gz -C $HOME texlive |
| # this script will generate a file 'R.xml' for auto-completion in Notepad++; I | |
| # wrote it when my programming style was pretty bad, but this script seems to be | |
| # still functional anyway | |
| # R.xml will be generated under your current work directory: getwd() | |
| # load some packages to the search path: | |
| pkg <- installed.packages()[, 'Priority'] | |
| sapply(names(pkg)[!is.na(pkg)], library, character.only = TRUE) | |
| # you may load any installed packages here |
| library(shiny) | |
| shinyServer(function(input, output) { | |
| # Make three independent, repeatable copies of rnorm so that the underlying | |
| # random values don't change | |
| rnorm1 = repeatable(rnorm) | |
| rnorm2 = repeatable(rnorm) | |
| rnorm3 = repeatable(rnorm) | |
See http://animation.r-forge.r-project.org/knitr/ for a preview of all knitr themes in HTML, and http://rclickhandbuch.files.wordpress.com/2014/09/knitrthemesoverview.pdf for a preview in LaTeX (credit to Berry Boessenkool).
The knitr themes manual can be found at (Rnw source).
| \documentclass{article} | |
| \begin{document} | |
| <<names>>= | |
| input$firstname | |
| input$lastname | |
| @ | |
| \end{document} |
| <script type="text/javascript"> | |
| SyntaxHighlighter.autoloader( | |
| "r path/to/your/syntaxhighlighter/scripts/shBrushR.js", | |
| "plain path/to/your/syntaxhighlighter/scripts/shBrushPlain.js", | |
| "sql path/to/your/syntaxhighlighter/scripts/shBrushSql.js", | |
| "js path/to/your/syntaxhighlighter/scripts/shBrushJScript.js", | |
| "html xml path/to/your/syntaxhighlighter/scripts/shBrushXml.js" | |
| ); | |
| SyntaxHighlighter.defaults["toolbar"] = false; | |
| SyntaxHighlighter.all(); |
| options(warn = -1) | |
| # cannot really suppress warnings from the root level | |
| withCallingHandlers(warning("hi"), warning = function(w) { | |
| print(w) | |
| }) | |
| # the warning can still be captured: | |
| ## <simpleWarning in withCallingHandlers(warning("hi"), warning = function(w) { print(w)}): hi> | |
| # however, this always works |
| Developer Certificate of Origin | |
| Version 1.1 | |
| Copyright (C) 2004, 2006 The Linux Foundation and its contributors. | |
| 1 Letterman Drive | |
| Suite D4700 | |
| San Francisco, CA, 94129 | |
| Everyone is permitted to copy and distribute verbatim copies of this | |
| license document, but changing it is not allowed. |
| library(xml2) | |
| page_post_links = function( | |
| page = 1, baseurl = 'https://www.rstudio.com/rviews', | |
| xpath = '//h2[@class="entry-title"]/a' | |
| ) { | |
| html = read_html(sprintf('%s/page/%d/', baseurl, page)) | |
| xml_attr(xml_find_all(html, xpath), 'href') | |
| } |