Skip to content

Instantly share code, notes, and snippets.

Martin Mächler mmaechler

Block or report user

Report or block mmaechler

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@mmaechler
mmaechler / ifelse-checks.R
Last active Nov 28, 2016
`ifelse2()` - experiments for a new version of `ifelse()`
View ifelse-checks.R
source("ifelse-def.R")
##' warnifnot(): a "only-warning" version of stopifnot():
##' {Yes, learn how to use do.call(substitute, ...) in a powerful manner !!}
warnifnot <- stopifnot
body(warnifnot) <- do.call(substitute, list(body(stopifnot),
list(stop = quote(warning))))
## (now, this was really cute ....)
@mmaechler
mmaechler / get-data.R
Created Jul 8, 2016 — forked from daroczig/get-data.R
Number of R packages submitted to CRAN
View get-data.R
## original idea & report by Henrik Bengtsson at
## https://stat.ethz.ch/pipermail/r-devel/2016-February/072388.html
## This script downloads the list of currently published R packages
## from CRAN and also looks at all the archived package versions to
## combine these into a list of all R packages ever published on
## CRAN with the date of first release.
## CRAN mirror to use
CRAN_page <- function(...) {
@mmaechler
mmaechler / first.Rmd
Last active Aug 29, 2015
First R Markdown example -- and demo about non-accurate decimal numbers
View first.Rmd
R Markdown: "Why 10 * 0.1 is rarely 1.0"
========================================================
This is an R Markdown document. Markdown is a simple formatting syntax for authoring web pages (in Rstudio click the **MD** toolbar button for help on Markdown).
When you click the **Knit HTML** button a web page will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
```{r}
summary(cars)
```
You can’t perform that action at this time.