available_tree: Available trees for measure and compute index.
In italocegatta/comp3:

Description Usage Arguments Examples

View source: R/border.R

This function works in retangular plots and identify wich trees are available for a util plot. The border parameter set how many spatial units (i.e. meters) will be used to creates buffer offsets.

1	available_tree(x, y, border)

`x,`	x numeric vector of coordinates.
`border`	numeric, buffer distance of boundary plot.

df <- data_frame(id = 1:25) %>%
  mutate(
    x = xcoord(x = id, xspacing =  2, ncol =  5, star = "left-bottom"),
    y = ycoord(x = id, yspacing =  2, ncol =  5, star = "left-bottom")
  ) %>%
  mutate(border = available_tree(x = x, y = y, border = 1))

if (require(ggplot2)) {
 ggplot(df, aes(x, y, label = id, color = border)) +
   geom_point(size = 4)
}