caracas (version 1.0.1)

subs_lst: Substitute symbol for of value given by a list

Description

Useful for substituting solutions into expressions.

Usage

subs_lst(s, x)

Arguments

s

Expression

x

Named list of values

Examples

# NOT RUN {
if (have_sympy()) {
     p <- as_symbol(paste0("p", 1:3))
     y <- as_symbol(paste0("y", 1:3))
     a <- as_symbol("a")
     l <- sum(y*log(p))
     L <- -l + a*(sum(p) - 1)
     g <- der(L, c(a, p))
     sols <- solve_sys(g, c(a, p))
     sol <- sols[[1L]]
     sol
     H <- der2(L, c(p, a))
     H
     H_sol <- subs_lst(H, sol)
     H_sol
}

# }