Skip to contents

This function takes a list of 4 numeric vectors (each representing entry probabilities for a terminal link) and returns the sum of the probabilities across the 4 vectors.

Usage

entry_p_sums(x)

Arguments

x

A list of 4 numeric vectors with an equal number of elements.

Value

A numeric vector of sums, where each element corresponds to the sum of the four probabilities.

Examples

entry_p_sums(list(
  a = c(0.2, 0.5, 1),
  b = c(0.8, 0.5, 0),
  c = c(0.2, 0.5, 1),
  d = c(0.8, 0.5, 1)
))
#> [1] 2 2 3