objectCF_r <- CFbuilder(Data = movies[1:500,], Datatype = "ratings",
similarity = "pearson")
colnames(objectCF_r$MU)
topkusers(CF = objectCF_r, Id_i = "The Lego Movie")
topkusers(CF = objectCF_r, Id_i = "Her")
Run the code above in your browser using DataLab