在 r/python 中查找 id 列之间的相似性

Question

The data is as follows:

id <- c(1,1,2,1,3,2)
address <- c("ABC Ret1","ABC","NY AB1","XYZ","DEL1","NY AB")
similar_address <- data.frame(id,address)

I want to find similar address of each id and make a new data.frame as below

Preferred is cosine similarity is used to find similarity among address

Answer 1

Using function sim.strings from package qlcMatrix:

get_count_of_similar_strings = function(x){
  issim=(sum(sim.strings(x)>=.5) - length(x))/1
  isnotsim=length(x)-issim
  c(issim,isnotsim)
}

out = by(similar_address$address
,similar_address$id
,get_count_of_similar_strings
,simplify = T)    

data.frame(id=unique(similar_address$id),t(sapply(out,I)))