knearest(Darr,P#u set,K)中的错误:对象';knD&x27;找不到

knearest(Darr,P#u set,K)中的错误:对象';knD&x27;找不到,r,R,我在R中使用了“smotefamily”软件包 然后我在CRDN文档中使用了这个示例 data_example = sample_generator(10000,ratio = 0.80) genData = ADAS(data_example[,-3],data_example[,3]) genData_2 = ADAS(data_example[,-3],data_example[,3],K=7) 但是有一个错误 Error in knearest(Darr, P_set, C) : ob

我在R中使用了“smotefamily”软件包 然后我在CRDN文档中使用了这个示例

data_example = sample_generator(10000,ratio = 0.80)
genData = ADAS(data_example[,-3],data_example[,3])
genData_2 = ADAS(data_example[,-3],data_example[,3],K=7)
但是有一个错误

Error in knearest(Darr, P_set, C) : object 'knD' not found
我只想用ADAS。 这是文档链接:

跟踪此错误,它是从
knearest
抛出的,其来源是:

> knearest
function (D, P, n_clust) 
{
    if (requireNamespace("FNN", quietly = TRUE)) {
        knD <- FNN::knnx.index(D, P, k = (n_clust + 1), algo = "kd_tree")
    }
    knD = knD * (knD != row(knD))
    que = which(knD[, 1] > 0)
    for (i in que) {
        knD[i, which(knD[i, ] == 0)] = knD[i, 1]
        knD[i, 1] = 0
    }
    return(knD[, 2:(n_clust + 1)])
}

跟踪此错误时,它是从
knearest
抛出的,其源是:

> knearest
function (D, P, n_clust) 
{
    if (requireNamespace("FNN", quietly = TRUE)) {
        knD <- FNN::knnx.index(D, P, k = (n_clust + 1), algo = "kd_tree")
    }
    knD = knD * (knD != row(knD))
    que = which(knD[, 1] > 0)
    for (i in que) {
        knD[i, which(knD[i, ] == 0)] = knD[i, 1]
        knD[i, 1] = 0
    }
    return(knD[, 2:(n_clust + 1)])
}