View source: R/02_exported_functions.R
| llr_test | R Documentation |
Two outputs of align_me can be tested as nested hypothesis. This can be used to test if e.g. buffer material influence can be neglected or a specific measurement point is an outlier.
llr_test(H0, H1, check = TRUE)
H0 |
output of align_me obeying the null hypothesis. A special
case of |
H1 |
output of align_me, the general case |
list with the log-likelihood ratio, statistical information and the numerical p-value calculated by the evaluating the chi-squared distribution at the present log-likelihood ratio with the current degrees of freedom.
## load provided example data file
lrr_data_path <- system.file(
"extdata", "example_llr_test.csv",
package = "blotIt3"
)
## import data
llr_data <- read_wide(
file = lrr_data_path,
description = seq(1, 4),
sep = ",",
dec = "."
)
## generate H0: the buffer column is not named as a biological effect e.g.
## not considered as a biological different condition
H0 <- align_me(
data = llr_data3,
model = "yi / sj",
error_model = "value * sigmaR",
biological = yi ~ name + time + stimmulus,
scaling = sj ~ name + ID,
error = sigmaR ~ name + 1,
parameter_fit_scale_log = FALSE,
normalize = TRUE,
average_techn_rep = FALSE,
verbose = FALSE,
normalize_input = TRUE
)
## generate H1: here the buffer column is named in the biological parameter
## therefore different entries are considered as biologically different
H1 <- align_me(
data = llr_data3,
model = "yi / sj",
error_model = "value * sigmaR",
biological = yi ~ name + time + stimmulus + buffer,
scaling = sj ~ name + ID,
error = sigmaR ~ name + 1,
parameter_fit_scale_log = FALSE,
normalize = TRUE,
average_techn_rep = FALSE,
verbose = FALSE,
normalize_input = TRUE
)
## perform test
llr_test(H0, H1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.