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.
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