Evaluates the peak model at given x values with specified parameters.
Examples
# Using a registered Gaussian model
model <- create_peak_model("gaussian")
x <- seq(0, 10, by = 0.1)
params <- list(height = 1, center = 5, width = 1)
y <- peak_model_value(model, x, params)
plot(x, y, type = "l")