当季节性时期未知时，优化STL（黄土时间序列的季节性分解）的季节性时期

Question

我可以在给定的季节性时间段内进行STL：

n <- 200
dat1 <- cumsum(sample(c(-1, 1), n, TRUE))
data_ts <- ts(dat1, freq =20)
plot(stl(data_ts, "per"))

但是，我不知道季节性时间段。如何在数学上确定哪个是最好的？

感谢您的帮助。