nonlinComb | R Documentation |
The nonlinComb
function calculates the combination
scores of two diagnostic tests selected among several non-linear combination
methods and standardization options
nonlinComb(
markers = NULL,
status = NULL,
event = NULL,
method = c("polyreg", "ridgereg", "lassoreg", "elasticreg", "splines", "sgam", "nsgam"),
degree1 = 3,
degree2 = 3,
df1 = 4,
df2 = 4,
resample = c("none", "cv", "repeatedcv", "boot"),
nfolds = 5,
nrepeats = 3,
niters = 10,
standardize = c("none", "min_max_scale", "zScore", "tScore", "scale_mean_to_one",
"scale_sd_to_one"),
include.interact = FALSE,
alpha = 0.5,
show.plot = TRUE,
direction = c("auto", "<", ">"),
conf.level = 0.95,
cutoff.method = c("CB", "MCT", "MinValueSp", "MinValueSe", "ValueSp", "ValueSe",
"MinValueSpSe", "MaxSp", "MaxSe", "MaxSpSe", "MaxProdSpSe", "ROC01", "SpEqualSe",
"Youden", "MaxEfficiency", "Minimax", "MaxDOR", "MaxKappa", "MinValueNPV",
"MinValuePPV", "ValueNPV", "ValuePPV", "MinValueNPVPPV", "PROC01", "NPVEqualPPV",
"MaxNPVPPV", "MaxSumNPVPPV", "MaxProdNPVPPV", "ValueDLR.Negative",
"ValueDLR.Positive", "MinPvalue", "ObservedPrev", "MeanPrev", "PrevalenceMatching"),
show.result = FALSE,
...
)
markers |
a |
status |
a |
event |
a |
method |
a
|
degree1 |
a |
degree2 |
a |
df1 |
a |
df2 |
a |
resample |
a
|
nfolds |
a |
nrepeats |
a |
niters |
a |
standardize |
a
|
include.interact |
a |
alpha |
a |
show.plot |
a |
direction |
a |
conf.level |
a |
cutoff.method |
a |
show.result |
a |
... |
further arguments. Currently has no effect on the results. |
A list of numeric
nonlinear combination scores calculated
according to the given method and standardization option
Serra Ilayda Yerlitas, Serra Bersan Gengec, Necla Kochan, Gozde Erturk Zararsiz, Selcuk Korkmaz, Gokmen Zararsiz
data("laparotomy")
data <- laparotomy
markers <- data[, -1]
status <- factor(data$group, levels = c("not_needed", "needed"))
event <- "needed"
cutoff.method <- "Youden"
score1 <- nonlinComb(
markers = markers, status = status, event = event,
method = "lassoreg", include.interact = FALSE, resample = "boot", niters = 5,
degree1 = 4, degree2 = 4, cutoff.method = cutoff.method,
direction = "<"
)
score2 <- nonlinComb(
markers = markers, status = status, event = event,
method = "splines", resample = "none", cutoff.method = cutoff.method,
standardize = "tScore", direction = "<"
)
score3 <- nonlinComb(
markers = markers, status = status, event = event,
method = "lassoreg", resample = "repeatedcv", include.interact = TRUE,
cutoff.method = "ROC01", standardize = "zScore", direction = "auto"
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.