inst/doc/component.R

In inlabru: Bayesian Latent Gaussian Modelling using INLA and Extensions

## ----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-----------------------------------------------------------------------------------
# ~ my_sp_effect(
#   main = eval_spatial(a_spatial_object, .data.),
#   model = "linear"
# )

## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ my_fixed_effects(
#   main = ~ x1:x2 + x3 * x4,
#   model = "fixed"
# )

## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ my_fixed_effects(
#   main = MatrixModels::model.Matrix(~ x1:x2 + x3 * x4, .data.),
#   model = "fixed"
# )

## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ a_component(
#   main = a_function,
#   model = ...
# )

## ----eval=FALSE-----------------------------------------------------------------------------------
# ~ a_component(
#   main = a_function(.data.),
#   model = ...
# )