benjamini_branch: Generate a branch of benjamini leaves

In urswilke/ggbenjamini: Generate ficus benjamina leaf shapes with bezier curves

Generate a branch of benjamini leaves

Description

Generate a branch of benjamini leaves

Usage

benjamini_branch(
  df_branch = tibble::tibble(x = c(70, 84, 126, 168), y = c(280, 245, 217, 217)),
  leaf_mean_dist_approx = 10,
  leaf_angle = 45,
  first_dir = sample(0:1, 1),
  leave_size_dist = spark_weibull(shape = 1.5, scale_factor = 0.8),
  leaf_angle_dist = spark_norm(mean = 0, sd = 3),
  last_angle_straight = TRUE,
  leaf_size_multiplicator = 1
)

Arguments

df_branch	dataframe containing the 4 x & y bezier coordinates of a branch
leaf_mean_dist_approx	approximate distance of two leaves
leaf_angle	angle between the leaf stalks and the branch
first_dir	direction of the first leaf in the branch (0 for right; 1 for left)
leave_size_dist	Manipulate the sizes of the leaves with a spark function This function returns a function which itself returns a numerical vector of length of the number of leaves on the branch. The function will be rescaled (divided by it's maximum value).
leaf_angle_dist	Manipulate the leaf angles with a spark function This function returns a function which itself returns a numerical vector of length of the number of leaves on the branch.
last_angle_straight	Logical if the angle of the last leaf on the branch is very sharp (defaults to TRUE).
leaf_size_multiplicator	Multiply leaf size distribution with a factor.

Value

A dataframe containing the data for leaves on a branch (see example).

Examples

benjamini_branch() %>%
  tidyr::unite(b, i_part, i_leaf, element, remove = FALSE) %>%
  ggplot2::ggplot() +
  ggforce::geom_bezier(ggplot2::aes(x = x, y = y, group = b)) +
  ggplot2::coord_equal()

urswilke/ggbenjamini documentation built on Sept. 13, 2023, 10:46 p.m.