| f <- function(...) { | |
| function(df) with(df, ...) | |
| } | |
| footate <- function(.data, ...) { | |
| dots <- list(...) | |
| for (column in names(dots)) { | |
| .data[[column]] <- dots[[column]](.data) | |
| } |
| #~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ | |
| #' Create a CSS ruleset | |
| #' | |
| #' Create a CSS ruleset consisting of a selector and one-or-more property declarations, | |
| #' or, if no \code{.selector} is given, create an inline style string | |
| #' | |
| #' The list of included properties is not a complete list, but rather an | |
| #' abbreviated list from | |
| #' \url{https://developer.mozilla.org/en-US/docs/Web/CSS/CSS_Properties_Reference} |
| library(tidyverse) | |
| n <- 150 | |
| sensitivity_threshold <- 5 | |
| data <- tibble( | |
| a = rgamma(n = n, shape = 5, rate = 0.5), | |
| b = rgamma(n = n, shape = a/2, rate = 0.5) | |
| ) | |
| generate_missing_data <- function(i){ |
| library(raster) | |
| library(rayshader) | |
| #Load QGIS georeference image (see https://www.qgistutorials.com/en/docs/3/georeferencing_basics.html) | |
| testindia = raster::stack("1870_southern-india_modified.tif") | |
| #Set bounding box for final map (cut off edges without data, introduced via reprojection) | |
| india_bb = raster::extent(c(68,92,1,20)) | |
| cropped_india = raster::crop(testindia, india_bb) | |
| #Convert to RGB array |
Install native ARM R: https://cloud.r-project.org/
Install RStudio (probably preview) which is not native as of today: https://www.rstudio.com/products/rstudio/download/preview/
This blog post is helpful for getting Tensorflow working, but it is older, before the ARM version of R and the RStudio version that supports it was available.
This other blog post has specific steps outlined, but some of it has also been superseded.