如何在数据框中找到最接近给定向量的行

假设我有一个如下所示的数据框:

Feature 1     Feature 2     Feature 3     Feature 4     Target    1             1             1             1            a    0             1             0             0            a     0             1             1             1            b

以及一个如下所示的向量:

0, 1, 1, 1

如何找到与该向量最匹配的行的索引?例如,如果我想找到最接近的两行,我会输入向量和数据框(可能去掉目标列),然后函数会返回索引1和3,因为这两行最接近向量“0, 1, 1, 1”。

我尝试使用R语言的“caret”包,命令如下:

intrain <- createDataPartition(y = data$Target, p= 0.7, list = FALSE)training <- data[intrain,]testing <- data[-intrain,]trctrl <- trainControl(method = "repeatedcv", number = 10, repeats = 3)knn_fit <- train(Target~., data = training, method = "knn", trControl = trctrl, preProcess = c("center", "scale"), tuneLength = 10)test_pred <- predict(knn_fit, newdata = testing)print(test_pred)

然而,这并不会返回匹配行的索引。它只会返回与测试数据集最接近的特征的目标预测值。

我希望找到一个类似于python中sklearn的KDtrees模型的模型/命令/函数,但在R语言中(KDtrees可以返回n个最接近的索引列表)。此外,虽然不是必需的,我希望该模型能够处理特征的分类值(如TRUE/FALSE),这样我就不必像这里用1和0那样创建虚拟变量了。


回答:

同意42的评论。使用简单的距离度量,第1行与向量的差异与第2行一样大。

# 你的数据featureframe <- data.frame(Feature1 = c(1,0,0), Feature2 = c(1,1,1),                            Feature3 = c(1,0,1), Feature4 = c(1,1,1),                            Target = c("a","a","b"))vec <- c(0,1,1,1)distances <- apply(featureframe[,1:4], 1, function(x) sum((x - vec)^2))distances# [1] 1 1 0

根据评论进行的编辑:

为了衡量分类上的相似性,你可以量化一个相似性度量,其中向量之和越接近向量的长度,两者就越接近:

similarity <- apply(featureframe[,1:4], 1, function(x) sum(x == vec))

如果你想对某些特征进行加权,可以在函数内将相似性向量乘以一个等长的权重向量。

similarity <- apply(featureframe[,1:4], 1, function(x) sum((x == vec) * c(1,2,1,1)))

Related Posts

使用LSTM在Python中预测未来值

这段代码可以预测指定股票的当前日期之前的值,但不能预测…

如何在gensim的word2vec模型中查找双词组的相似性

我有一个word2vec模型,假设我使用的是googl…

dask_xgboost.predict 可以工作但无法显示 – 数据必须是一维的

我试图使用 XGBoost 创建模型。 看起来我成功地…

ML Tuning – Cross Validation in Spark

我在https://spark.apache.org/…

如何在React JS中使用fetch从REST API获取预测

我正在开发一个应用程序,其中Flask REST AP…

如何分析ML.NET中多类分类预测得分数组?

我在ML.NET中创建了一个多类分类项目。该项目可以对…

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注