R/util.R

Defines functions loglik

loglik <- function(slope, intercept, x, y, noise_sd) {
    sum(dnorm(y, mean = (slope * x) + intercept, sd = noise_sd, log = TRUE))
}
Alanocallaghan/shinystats documentation built on Dec. 17, 2021, 7:46 a.m.