dkcens2 | R Documentation |
Computes likelihood contribution for censored data.
dkcens2(xleft, xright, c_code_filters, distr = NULL, mu = NULL, sigma = NULL)
For internal use
## The function is currently defined as
function(xleft, xright, c_code_filters, distr = NULL, mu = NULL,
sigma = NULL) {
res <- seq_along(xleft)
res[c_code_filters[["1"]]] <- dk(
x = xleft[c_code_filters[["1"]]],
distr, mu, sigma
)
res[c_code_filters[["2"]]] <- pk(
xright[c_code_filters[["2"]]],
distr, mu, sigma
)
res[c_code_filters[["0"]]] <- 1 - pk(
xleft[c_code_filters[["0"]]],
distr, mu, sigma
)
res[c_code_filters[["3"]]] <- pk(
xright[c_code_filters[["3"]]],
distr, mu, sigma
) - pk(
xleft[c_code_filters[["3"]]],
distr, mu, sigma
)
return(res)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.