Data607 Assignment 2

library(dbConnect)

## Loading required package: RMySQL

## Loading required package: DBI

## Loading required package: gWidgets

MovieReviewsDbConnection=dbConnect(
                 MySQL(),user="root",
                 host="localhost",
                 dbname="data607ass2",
                 password="password" 
                 )

MovieReviewsTable <- DBI::dbGetQuery(MovieReviewsDbConnection, "SELECT * FROM moviereviews;")
print(MovieReviewsTable)

##   viewername AStarIsBorn IntoTheSpiderverse BlackPanther Roma EighthGrade
## 1       Dena           5                  4            5    4           5
## 2        Rob           5                  5            5    4           4
## 3      Toren           4                  4            4    2           2
## 4        Dee           5                  3            5    4           2
## 5      Annie           5                  5            4    3           5
##   FirstReformed
## 1             2
## 2             1
## 3             5
## 4             5
## 5             1