clarify filtering used in epoch images, and add erp_image test

craddm · Jul 1, 2021 · ba4842e · ba4842e
1 parent 0f23749
commit ba4842e
Show file tree

Hide file tree

Showing 5 changed files with 76 additions and 4 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -318,7 +318,6 @@ importFrom(signal,filtfilt)
 importFrom(signal,freqz)
 importFrom(stats,cor)
 importFrom(stats,cov)
-importFrom(stats,fft)
 importFrom(stats,median)
 importFrom(stats,mvfft)
 importFrom(stats,nextn)

diff --git a/R/epoch_images.R b/R/epoch_images.R
@@ -1,6 +1,6 @@
 #' Plot ERP images
 #'
-#' Plot an ERP image from a single electrode. Smooths over a series of trials in
+#' Plot an ERP image from a single electrode. Uses a boxcar smooth over a series of trials in
 #' order to make across-trial patterns more apparent.
 #'
 #' @examples
@@ -14,7 +14,6 @@
 #' @param ... Other arguments passed to the method.
 #' @author Matt craddock \email{matt@@mattcraddock.com}
 #' @import ggplot2
-#' @importFrom scales squish
 #' @return A `ggplot` object
 #' @export
 

diff --git a/man/erp_image.Rd b/man/erp_image.Rd
diff --git a/tests/testthat/_snaps/epoch_images/erp-image-a29-from-demo-epochs.svg b/tests/testthat/_snaps/epoch_images/erp-image-a29-from-demo-epochs.svg
diff --git a/tests/testthat/test-epoch_images.R b/tests/testthat/test-epoch_images.R
@@ -0,0 +1,8 @@
+test_that("epoch images plot correctly", {
+  skip_on_ci()
+  vdiffr::expect_doppelganger(
+    "ERP image A29 from demo epochs",
+    erp_image(demo_epochs,
+              "A29")
+  )
+})