我有一次我想计算 Z 分数的意级，但如果我应用布林通道进行验证，我会得到不同的结果。如果我理解正确，从两者(Zscore，BB(我们应该得到相同的结果，在Zscore中只是归一化的结果。
library("TTR")
data <- read.csv(file="ts1.csv",h=F)
data <- as.numeric(unlist(data))
zs <- (data-SMA(data, n=20))/sd(data)
bb <- BBands(data, n = 20, SMA, sd=2)
par(mfrow = c(2,1))
plot(data, t = "l")
lines(bb[,1], col = 'brown')
lines(bb[,2], col = 'brown')
lines(bb[,3], col = 'brown')
plot(zs, col = "black", t="l")
结果是： 在此处输入图像描述
数据来源：https://www.dropbox.com/s/vpgd4mtm2bvbc9t/ts1.csv?dl=0
解决方案是：zs <- (data-SMA(data， n=20((/runSD(data， n = 20(