Nothing
## ----setup, include = FALSE---------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
dev = "png",
dev.args = list(type = "cairo-png"),
fig.width = 7,
fig.height = 5
)
## ----results="hide",warning=FALSE,message=FALSE,echo=FALSE----------------------------------------
options(width = 100) # sets width of output window
## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ my_component_name(
# main = ...,
# model = ...
# )
## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ my_spde_effect(
# cbind(x, y),
# model = spde_model
# )
## ----eval=FALSE-----------------------------------------------------------------------------------
# get_xy <- function(df) {
# cbind(df$x, df$y)
# }
# ~ my_spde_effect(
# get_xy(.data.),
# model = spde_model
# )
## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ my_intercept(1)
## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ my_intercept(
# main = rep(1, n),
# model = "linear"
# )
## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ my_sp_effect(
# main = a_spatial_object,
# model = "linear"
# )
## ----eval=FALSE-----------------------------------------------------------------------------------
# get_sp_covariate <- function(df) {
# locs <- coordinates(df)
# over(locs, an_sp_object)[, 1]
# }
#
# ~ my_sp_effect(
# main = get_sp_covariate(.data.),
# model = "linear"
# )
## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ my_fixed_effects(
# main = ~ x1:x2 + x3 * x4,
# model = "fixed"
# )
## ----eval=FALSE-----------------------------------------------------------------------------------
# MatrixModels::model.Matrix(~ x1:x2 + x3 * x4, .data.)
## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ a_component(
# main = a_function,
# model = ...
# )
## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ a_component(
# main = a_function(.data.),
# model = ...
# )
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.