# NOT RUN {
# Use sample data
df = sample_raw_accel_data
# View input
illustrate_signal(df, plot_maxed_out_line = FALSE)
# Apply filtering that uses the same setting as in MIMSunit algorithm
output = iir(df, sr=80, cutoff_freq=c(0.2, 5), type='pass')
# View output
illustrate_signal(output, plot_maxed_out_line = FALSE)
# }
Run the code above in your browser using DataLab