Хешируйте локальную часть адреса электронной почты в R, чтобы скрыть значения

Question

Я пытаюсь разобрать поле адреса электронной почты в его локальную и доменную части, MD5 хеширует локальную часть, а затем объединяет их вместе.Цель здесь состоит в том, чтобы скрыть данные в нашей среде разработки, но при этом разрешить объединение поля с другими наборами данных этим полем.У меня такой вид работы, но я не могу заставить значение parselcl возвращаться правильно ... Я ожидал, что это будет вектор, но оно вернется как одно значение.

Вот мой код:

 library(stringr)
 localp <- gsub("@.*", "", dat$channels.email.address)
 domainp <- gsub(".*@", "", dat$channels.email.address)
 parsedlcl <- digest(localp, "md5", serialize = FALSE)
 dat$channels.email.address <- str_c(parsedlcl, "@", domainp)

Answer 1

Вам нужно перебрать digest по всем значениям в dat $ channel.email.address.В противном случае он просто сгенерирует одно значение, которое вы испытываете.

Ваш код будет выглядеть так:

library(stringr)
library(digest)

localp <- gsub("@.*", "", dat$channels.email.address)
domainp <- gsub(".*@", "", dat$channels.email.address)

for(i in seq_along(dat$channels.email.address)) {
  parsedlcl[i] <- digest(localp[i], "md5", serialize = F)
}

dat$channels.email.address <- str_c(parsedlcl, "@", domainp)