R中的TSclust軟件包，SAX.breakpoints.table函數的定義是什么

Question

包TSclust中有一個名為MINDIST.SAX的函數。 這是函數的主體：

require(TSclust)
> MINDIST.SAX
function (x, y, alpha, n) 
{
    w <- length(x)
    symb <- SAX.breakpoints.table(alpha)
    d <- 0
    for (i in 1:w) {
        xi <- x[i]
        yi <- y[i]
        if (abs(xi - yi) > 1) {
            d <- d + (symb[max(xi, yi)] - symb[min(xi, yi) + 
                1])^2
        }
    }
    sqrt((n/w) * d)
}
<environment: namespace:TSclust>

從上面可以看到，還有另一個名為SAX.breakpoints.table函數已被調用。

我需要知道此函數的確切定義（即SAX.breakpoints.table ）。 我嘗試了SAX.breakpoints.table

> SAX.breakpoints.table
Error: object 'SAX.breakpoints.table' not found

以及：

> ls("package:TSclust")
 [1] "cluster.evaluation"    "convert.to.SAX.symbol" "diss"                  "diss.ACF"             
 [5] "diss.AR.LPC.CEPS"      "diss.AR.MAH"           "diss.AR.PIC"           "diss.CDM"             
 [9] "diss.CID"              "diss.COR"              "diss.CORT"             "diss.DTWARP"          
[13] "diss.DWT"              "diss.EUCL"             "diss.FRECHET"          "diss.INT.PER"         
[17] "diss.MINDIST.SAX"      "diss.NCD"              "diss.PACF"             "diss.PDC"             
[21] "diss.PER"              "diss.PRED"             "diss.SPEC.GLK"         "diss.SPEC.ISD"        
[25] "diss.SPEC.LLR"         "loo1nn.cv"             "MINDIST.SAX"           "PAA"                  
[29] "pvalues.clust"

但是我找不到它！

Answer 1

>TSclust:::SAX.breakpoints.table
function (n) 
{
    qnorm(0:n/n)
}
<environment: namespace:TSclust>

這個問題， 用R查看源代碼 ，將有助於查看包中的任何功能，甚至包括隱藏的功能。

希望這可以幫助