add_neigh_mean

Get average of neighbour observations

Usage

add_neigh_mean(x, grid_obj)

Arguments

x

vector of observations

grid_obj

grid object

Value

vector of neighbour means

Examples

grid_example <- grid
count_grid_behaviour(grid_example, skink_grid) |> 
dplyr::mutate(
 neigh_mean = add_neigh_mean(obs, grid_example)
)
#> # A tibble: 16 × 3
#>     grid   obs neigh_mean
#>    <dbl> <dbl>      <dbl>
#>  1     1    51      791  
#>  2     2   917     1028. 
#>  3     3  1077      937. 
#>  4     4    13     1309. 
#>  5     5   551      399. 
#>  6     6   905      679. 
#>  7     7  2554      440. 
#>  8     8   295      774. 
#>  9     9    37      311. 
#> 10    10    86      528. 
#> 11    11   156      491. 
#> 12    12    68      602. 
#> 13    13     0       45  
#> 14    14    12       57  
#> 15    15     6       64.4
#> 16    16     0       76.7