TSclust包的SAX函數產生錯誤

Question

我正在將TSclust軟件包用於SAX（符號聚合聚集）圖。 根據第25頁上的示例，我正在使用該功能

SAX.plot(as.ts(df$power), w=30, alpha=4) 

但是，它會產生如下錯誤：

Error in if ((n <- as.integer(n[1L])) > 0) { : argument is of length zero

我無法調試它。 即使我查看了SAX.plot函數的源代碼，但也找不到鍵入的相關錯誤消息。

所需的R數據對象可在鏈接中找到

R版本：3.2
TSclust版本：1.2.3

Answer 1

您好，顯然是因為您需要規范化數據，請查看以下示例：

# Parameters
w <- 30 
alpha <- 4 

# PAA
x <- df$power
paax <- PAA(x, w) 
plot(x, type="l", main="PAA reduction of series x") 
p <- rep(paax,each=length(x)/length(paax)) #just for plotting the PAA
lines(p, col="red")

# SAX
convert.to.SAX.symbol(paax , alpha)
# [1] 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4
# You need to scale PAA result
convert.to.SAX.symbol(scale(paax) , alpha)
# [1] 1 1 1 1 1 1 1 1 1 2 2 1 4 3 3 1 2 2 2 4 4 4 1 1 2 4 3 3 4 4


# SAX plot : with scaling this works
SAX.plot(as.ts(scale(df$power)), w=w, alpha=alpha) 

您可能可以在功能幫助頁面中找到該示例。