review <- read.csv("https://raw.githubusercontent.com/swigodsky/DATA-607/master/moviereviewers1.csv")
colnames(review) <- c("Movie Name", "Reviewer", "Rating")
review
##          Movie Name Reviewer Rating
## 1  Fantastic Beasts      Dan      3
## 2  Fantastic Beasts    Nadav      3
## 3  Fantastic Beasts     Alon      3
## 4  Fantastic Beasts    Deena      4
## 5            Fences    Sarah      5
## 6            Fences      Dan      5
## 7         Spiderman    Robin      2
## 8         Spiderman     Alon      3
## 9         Spiderman    Deena      4
## 10  The Jungle Book    David      4
## 11  The Jungle Book    Sarah      5
## 12  The Jungle Book    Deena      5
## 13      Wonderwoman    Sarah      4
## 14      Wonderwoman    Nadav      3
## 15      Wonderwoman     Alon      4
## 16      Wonderwoman    Deena      5
## 17      Wonderwoman    Robin      4
## 18         Zootopia    Sarah      5
## 19         Zootopia    Robin      5
## 20         Zootopia     Alon      4