From 33dd96e36ba064d0180abd973bdf2b66ae5da7a1 Mon Sep 17 00:00:00 2001 From: Ale Santuz <7524938+alesantuz@users.noreply.github.com> Date: Tue, 12 Nov 2024 10:53:36 +0100 Subject: [PATCH] Improved `filtEMG` robustness --- R/filtEMG.R | 2 +- R/subsetEMG.R | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/R/filtEMG.R b/R/filtEMG.R index ed2b534..6530fa5 100644 --- a/R/filtEMG.R +++ b/R/filtEMG.R @@ -52,7 +52,7 @@ filtEMG <- function(x, min_sub = TRUE, ampl_norm = TRUE) { if (!inherits(x, "EMG")) { - stop("Object is not of class EMG, please create objects in the right format with \"rawdata\"") + stop("Object is not of class EMG, please create objects in correct format with \"rawdata\"") } else { cycles <- data.frame(x$cycles) x <- x$emg diff --git a/R/subsetEMG.R b/R/subsetEMG.R index 2faa93f..883c242 100644 --- a/R/subsetEMG.R +++ b/R/subsetEMG.R @@ -40,7 +40,7 @@ subsetEMG <- function(x, cy_max, cy_start = 1) { if (!inherits(x, "EMG")) { - stop("Object is not of class EMG, please create objects in the right format with \"rawdata\"") + stop("Object is not of class EMG, please create objects in correct format with \"rawdata\"") } else { cycles <- data.frame(x$cycles) x <- x$emg