情况概述如下：
我的输入数据集的格式为
User Phone
Tim Iphone4
Jim Iphone5
JIm Samsung GS4
Tom HTC One X
Jerry Nokia
在读入程序后在csv上使用以下代码：
UFONE <- as.data.frame(userphones)
user = levels(factor(UFONE[,1]))
phone = levels(factor(UFONE[,2]))
结果是唯一的有序和编号列表，如下所示：
User --> Jerry(1), Jim(2), Tim(3), Tom(4)
Phone --> HTC One X(1), Iphone4(2), Iphone5(3), Nokia(4), Samsung GS4(5)
使用这些数字，我构建了一个如下所示的矩阵，并找到了用户的特征向量中心性：
1 2 3 4 5
1 0 0 0 1 0
2 0 0 1 0 1
3 0 1 0 0 0
4 1 0 0 0 0
我的问题是在找到中心值后，如果我想追溯用户，我该如何从这个编号矩阵中做到。
如果您觉得此问题需要进一步的信息，请告诉我。