plot example: make simpler to reduce computing time

lschneiderbauer · Jun 13, 2024 · 382753a · 382753a
1 parent bd89fc4
commit 382753a
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/fcwtr_scalogram.R b/R/fcwtr_scalogram.R
@@ -152,7 +152,7 @@ as.data.frame.fcwtr_scalogram <- function(x, ...) {
 #' @importFrom graphics plot
 #' @export
 #' @examplesIf requireNamespace("ggplot2", quietly = TRUE)
-#' ts_sin_440 <- sin((1:44100) * 2 * pi * 440 / 44100)
+#' ts_sin_440 <- sin((1:4410) * 2 * pi * 440 / 44100)
 #'
 #' res <-
 #'   fcwt(

diff --git a/man/plot.fcwtr_scalogram.Rd b/man/plot.fcwtr_scalogram.Rd