Nothing
## ---- echo = FALSE------------------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>")
## ---- echo = TRUE-------------------------------------------------------------
library(magclass)
a <- maxample("animal")
p <- maxample("pop")
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, split = TRUE)
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = 1, split = TRUE)
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = 1.1, full = TRUE)
## ---- echo = TRUE-------------------------------------------------------------
dimSums(a, c("x", "y", "cell", "day", "month", "species", "color"))
getCPR(a, 3.2)
add_dimension(p[, 1, 1], 1.2)
add_columns(p[, 1, 1], dim = "i")
## ---- echo = TRUE-------------------------------------------------------------
p[3, dim = 2] # equivalent to p[,3,]
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = 3.2)
getItems(a, dim = "color")
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = 3.2, full = TRUE)
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = 3)
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = 3, split = TRUE)
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = "color") <- paste0("color", 1:4)
getItems(a, dim = 3)
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = "color", full = TRUE) <- paste0("color", 1:5)
getItems(a, dim = 3)
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, dim = "color") <- NULL
getItems(a, dim = 3)
## ---- echo = TRUE-------------------------------------------------------------
getItems(a, maindim = 3, dim = "newcolor") <- paste0("color", 1:5)
getItems(a, dim = 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.