Nothing
set.seed(123) knitr::opts_chunk$set( collapse = TRUE, comment = "#>", cache = TRUE )
library(ripe)
stats::runif(20)%>% ripe(replicate,n=2,simplify=FALSE) stats::runif(20)%>% sample(10)%>% ripe(replicate,n=3,simplify=FALSE) stats::runif(20)%>% sample(10)%>% utils::head(5)%>% ripe(replicate,n=4,simplify=FALSE)
stats::runif(20)%>% sample(10)%>% utils::head(5)%>% ripe(lapply, X=1:4)
(ncores <- parallel::detectCores())
stats::runif(20)%>% sample(10)%>% utils::head(5)%>% ripe(parallel::mclapply, X=1:4, mc.cores = pmin(1,ncores-1))
iris %>% dplyr::sample_n(5) %>% ripe(purrr::rerun,.n=3) iris %>% dplyr::select(1:2) %>% dplyr::sample_n(20) %>% ripe(purrr::rerun,.n=1) iris %>% dplyr::select(1:2)%>% dplyr::sample_n(20) %>% dplyr::slice(1:5) %>% ripe(purrr::rerun,.n=3)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.