2015-11-29 2 views

ответ

0

Это хорошо работает для меня ... Будьте уверены, что вы загружаете файл movieLens.txt с точным так, как показано в previous video учебника , т.е. не использовать «Сохранить как» и Internet Explorer. Тогда это должно работать:

movies = read.table("movieLens.txt", header=FALSE, sep="|",quote="\"") 

# Add column names 
colnames(movies) = c("ID", "Title", "ReleaseDate", "VideoReleaseDate", "IMDB", "Unknown", "Action", "Adventure", "Animation", "Childrens", "Comedy", "Crime", "Documentary", "Drama", "Fantasy", "FilmNoir", "Horror", "Musical", "Mystery", "Romance", "SciFi", "Thriller", "War", "Western") 

# Remove unnecessary variables 
movies$ID = NULL 
movies$ReleaseDate = NULL 
movies$VideoReleaseDate = NULL 
movies$IMDB = NULL 

# Remove duplicates 
movies = unique(movies) 

# Compute distances 
distances = dist(movies[2:20], method = "euclidean") 

# Hierarchical clustering 
clusterMovies = hclust(distances, method = "ward") 

# Plot the dendrogram 
plot(clusterMovies) 

кроме безобидного предупреждающее сообщение, после команды clustermovies:

The "ward" method has been renamed to "ward.D"; note new "ward.D2" 
Смежные вопросы