dataset = list(
data = matrix(
c(
1, 1.1, 1.2, 20, 1.1, 1.2,
2, 2.1, 2.2, 30, 2.1, 2.2
),
nrow = 6,
ncol = 2,
dimnames = list(
paste0("wavenumber", 1:6),
paste0("sample", 1:2)
)
)
)
despiked = raman_despike(
dataset,
ma = 1,
threshold = 3
)
despiked$despike$n_spikes
Run the code above in your browser using DataLab