Computes the F-Score of a SDTS prediction.

sdts_score(pred, gtruth, beta = 1)

Arguments

pred

a vector of logical. Predicted annotation from sdts_predict()

gtruth

a vector of logical. Ground truth annotation.

beta

a numeric. See details. (default is 1).

Value

Returns a list with f_score, precision and recall.

Details

beta is used to balance F-score towards recall (>1) or precision (<1).

References

  • Yeh C-CM, Kavantzas N, Keogh E. Matrix profile IV: Using Weakly Labeled Time Series to Predict Outcomes. Proc VLDB Endow. 2017 Aug 1;10(12):1802-12.

Website: https://sites.google.com/view/weaklylabeled

See also

Other Scalable Dictionaries: sdts_predict(), sdts_train()

Examples

# This is a fast toy example and results are useless. For a complete result, run the code inside
#' Not run' section below.
w <- c(110, 220)
subs <- 11000:20000
tr_data <- mp_test_data$train$data[subs]
tr_label <- mp_test_data$train$label[subs]
te_data <- mp_test_data$test$data[subs]
te_label <- mp_test_data$test$label[subs]
model <- sdts_train(tr_data, tr_label, w, verbose = 0)
#> Error in mat_pro[[i]]: subscript out of bounds
predict <- sdts_predict(model, te_data, round(mean(w)))
#> Error in sdts_predict(model, te_data, round(mean(w))): object 'model' not found
sdts_score(predict, te_label, 1)
#> Error in pred_tmp[seq_len(length(pred))] <- pred: incompatible types (from closure to logical) in subassignment type fix
# \donttest{
windows <- c(110, 220, 330)
model <- sdts_train(mp_test_data$train$data, mp_test_data$train$label, windows)
#> Stage 1 of 3, compute matrix profile...
#> Error in mat_pro[[i]]: subscript out of bounds
predict <- sdts_predict(model, mp_test_data$test$data, round(mean(windows)))
#> Error in sdts_predict(model, mp_test_data$test$data, round(mean(windows))): object 'model' not found
sdts_score(predict, mp_test_data$test$label, 1)
#> Error in pred_tmp[seq_len(length(pred))] <- pred: incompatible types (from closure to logical) in subassignment type fix
# }