R - 用不那么复杂的东西替换唯一标识符 [英] R - Replace unique identifiers with something less complicated

问题描述

我有两个数据框，它们与一个非常长的用户 ID 相关，我想用更易读的东西替换这些值，比如一个简单的整数值.显然，我想保持数据帧之间的这些值一致，我想知道是否有一种简单的方法可以做到这一点.这是 data.frames 的样子:

I have two data frames that are related by a really long user ID, and I want to replace these values with something more readable, like a simple integer value. Obviously I want to keep these values consistent between data frames and I was wondering if there is a simple way to do this. Here is what the data.frames look like:

ArtistData - 显示用户收听特定艺术家的次数:

ArtistData - Shows how many times a user listened to a particular artist:

UserID                                     Artist      Plays
00000c289a1829a808ac09c00daf10bc3c4e223b   elvenking   706
00000c289a1829a808ac09c00daf10bc3c4e223b   lunachicks  538
00001411dc427966b17297bf4d69e7e193135d89   stars       373
...                                        ...         ...

UserData - 显示每个用户的信息:

UserData - Shows information on each individual user:

UserID                                     gender   age  country
00001411dc427966b17297bf4d69e7e193135d89   m        21   Germany
00004d2ac9316e22dc007ab2243d6fcb239e707d   f        34   Mexico
000063d3fe1cf2ba248b9e3c3f0334845a27a6bf   m        27   Poland
...                                        ...      ...  ...

所以基本上，我可以用每个数据帧之间一致的整数替换这些对我没有意义的长字符串吗?

So basically, can I replace these long strings that have no meaning for me with an integer that is consistent between each data frame?

推荐答案

使用两个数据集中所有可能的 UserID 转换为带有简化标签的 factor:

Convert to factors with simplified labels, using all possible UserID's in both datasets:

levs <- union(UserData$UserID, ArtistData$UserID)

ArtistData$newid <- factor(
  ArtistData$UserID, levels=levs, labels=seq_along(levs)
)

UserData$newid <- factor(
  UserData$UserID, levels=levs, labels=seq_along(levs)
)

ArtistData
#                                    UserID     Artist Plays newid
#1 00000c289a1829a808ac09c00daf10bc3c4e223b  elvenking   706     4
#2 00000c289a1829a808ac09c00daf10bc3c4e223b lunachicks   538     4
#3 00001411dc427966b17297bf4d69e7e193135d89      stars   373     1

UserData
#                                    UserID gender age country newid
#1 00001411dc427966b17297bf4d69e7e193135d89      m  21 Germany     1
#2 00004d2ac9316e22dc007ab2243d6fcb239e707d      f  34  Mexico     2
#3 000063d3fe1cf2ba248b9e3c3f0334845a27a6bf      m  27  Poland     3

这篇关于R - 用不那么复杂的东西替换唯一标识符的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！