Description Usage Arguments Value See Also Examples
The as.data.frame
function converts an S3
object generated by
evalmod
to a data frame.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 | ## S3 method for class 'sscurves'
as.data.frame(x, row.names = NULL, optional = FALSE,
raw_curves = NULL, ...)
## S3 method for class 'mscurves'
as.data.frame(x, row.names = NULL, optional = FALSE,
raw_curves = NULL, ...)
## S3 method for class 'smcurves'
as.data.frame(x, row.names = NULL, optional = FALSE,
raw_curves = NULL, ...)
## S3 method for class 'mmcurves'
as.data.frame(x, row.names = NULL, optional = FALSE,
raw_curves = NULL, ...)
## S3 method for class 'sspoints'
as.data.frame(x, row.names = NULL, optional = FALSE,
raw_curves = NULL, ...)
## S3 method for class 'mspoints'
as.data.frame(x, row.names = NULL, optional = FALSE,
raw_curves = NULL, ...)
## S3 method for class 'smpoints'
as.data.frame(x, row.names = NULL, optional = FALSE,
raw_curves = NULL, ...)
## S3 method for class 'mmpoints'
as.data.frame(x, row.names = NULL, optional = FALSE,
raw_curves = NULL, ...)
## S3 method for class 'aucroc'
as.data.frame(x, row.names = NULL, optional = FALSE, ...)
|
x |
An
See the Value section of | ||||||||||||||||||||||||||||||||||||
row.names |
Not used by this method. | ||||||||||||||||||||||||||||||||||||
optional |
Not used by this method. | ||||||||||||||||||||||||||||||||||||
raw_curves |
A Boolean value to specify whether raw curves are
shown instead of the average curve. It is effective only
when | ||||||||||||||||||||||||||||||||||||
... |
Not used by this method. |
The as.data.frame
function returns a data frame.
evalmod
for generating S3
objects with
performance evaluation measures.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 | ## Not run:
##################################################
### Single model & single test dataset
###
## Load a dataset with 10 positives and 10 negatives
data(P10N10)
## Generate an sscurve object that contains ROC and Precision-Recall curves
sscurves <- evalmod(scores = P10N10$scores, labels = P10N10$labels)
## Convert sscurves to a data frame
sscurves.df <- as.data.frame(sscurves)
## Show data frame
head(sscurves.df)
## Generate an sspoints object that contains basic evaluation measures
sspoints <- evalmod(mode = "basic", scores = P10N10$scores,
labels = P10N10$labels)
## Convert sspoints to a data frame
sspoints.df <- as.data.frame(sspoints)
## Show data frame
head(sspoints.df)
##################################################
### Multiple models & single test dataset
###
## Create sample datasets with 100 positives and 100 negatives
samps <- create_sim_samples(1, 100, 100, "all")
mdat <- mmdata(samps[["scores"]], samps[["labels"]],
modnames = samps[["modnames"]])
## Generate an mscurve object that contains ROC and Precision-Recall curves
mscurves <- evalmod(mdat)
## Convert mscurves to a data frame
mscurves.df <- as.data.frame(mscurves)
## Show data frame
head(mscurves.df)
## Generate an mspoints object that contains basic evaluation measures
mspoints <- evalmod(mdat, mode = "basic")
## Convert mspoints to a data frame
mspoints.df <- as.data.frame(mspoints)
## Show data frame
head(mspoints.df)
##################################################
### Single model & multiple test datasets
###
## Create sample datasets with 100 positives and 100 negatives
samps <- create_sim_samples(10, 100, 100, "good_er")
mdat <- mmdata(samps[["scores"]], samps[["labels"]],
modnames = samps[["modnames"]],
dsids = samps[["dsids"]])
## Generate an smcurve object that contains ROC and Precision-Recall curves
smcurves <- evalmod(mdat, raw_curves = TRUE)
## Convert smcurves to a data frame
smcurves.df <- as.data.frame(smcurves)
## Show data frame
head(smcurves.df)
## Generate an smpoints object that contains basic evaluation measures
smpoints <- evalmod(mdat, mode = "basic")
## Convert smpoints to a data frame
smpoints.df <- as.data.frame(smpoints)
## Show data frame
head(smpoints.df)
##################################################
### Multiple models & multiple test datasets
###
## Create sample datasets with 100 positives and 100 negatives
samps <- create_sim_samples(10, 100, 100, "all")
mdat <- mmdata(samps[["scores"]], samps[["labels"]],
modnames = samps[["modnames"]],
dsids = samps[["dsids"]])
## Generate an mscurve object that contains ROC and Precision-Recall curves
mmcurves <- evalmod(mdat, raw_curves = TRUE)
## Convert mmcurves to a data frame
mmcurves.df <- as.data.frame(mmcurves)
## Show data frame
head(mmcurves.df)
## Generate an mmpoints object that contains basic evaluation measures
mmpoints <- evalmod(mdat, mode = "basic")
## Convert mmpoints to a data frame
mmpoints.df <- as.data.frame(mmpoints)
## Show data frame
head(mmpoints.df)
##################################################
### N-fold cross validation datasets
###
## Load test data
data(M2N50F5)
## Speficy nessesary columns to create mdat
cvdat <- mmdata(nfold_df = M2N50F5, score_cols = c(1, 2),
lab_col = 3, fold_col = 4,
modnames = c("m1", "m2"), dsids = 1:5)
## Generate an mmcurve object that contains ROC and Precision-Recall curves
cvcurves <- evalmod(cvdat)
## Convert mmcurves to a data frame
cvcurves.df <- as.data.frame(cvcurves)
## Show data frame
head(cvcurves.df)
## Generate an mmpoints object that contains basic evaluation measures
cvpoints <- evalmod(cvdat, mode = "basic")
## Convert mmpoints to a data frame
cvpoints.df <- as.data.frame(cvpoints)
## Show data frame
head(cvpoints.df)
##################################################
### AUC with the U statistic
###
## mode = "aucroc"
data(P10N10)
uauc1 <- evalmod(scores = P10N10$scores, labels = P10N10$labels,
mode="aucroc")
# as.data.frame 'aucroc'
as.data.frame(uauc1)
## mode = "aucroc"
samps <- create_sim_samples(10, 100, 100, "all")
mdat <- mmdata(samps[["scores"]], samps[["labels"]],
modnames = samps[["modnames"]],
dsids = samps[["dsids"]])
uauc2 <- evalmod(mdat, mode="aucroc")
# as.data.frame 'aucroc'
head(as.data.frame(uauc2))
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.