## Not run: ------------------------------------
# #Generate 2 HS patterns
# a <- c(generator(),generator())
# #recognise both HS patterns
# #set window size to 100, step size to 100
# #switch off recognition for all patterns other than HS
# slicer(data = a, length = 100, step = 100, hsiq=TRUE, btpiq=FALSE, rtpiq=FALSE, dtpiq=FALSE)
## ---------------------------------------------
Run the code above in your browser using DataLab