plate_filepath <- system.file(
"extdata", "CovidOISExPONTENT.csv",
package = "PvSTATEM", mustWork = TRUE
) # get the filepath of the csv dataset
layout_filepath <- system.file(
"extdata", "CovidOISExPONTENT_layout.xlsx",
package = "PvSTATEM", mustWork = TRUE
)
plate <- read_luminex_data(plate_filepath, layout_filepath) # read the data
# here we plot the data with observed high dose hook effect
plot_standard_curve_analyte(plate, "RBD_omicron")
# here we create the model with the high dose hook effect handled
model <- create_standard_curve_model_analyte(plate, "RBD_omicron")
Run the code above in your browser using DataLab