Class 3 Troubleshooting

df <- read.csv("~/Desktop/WFED 540 FA17/WFED540sept112017/WFED540Class3Homework/WFED540RJF227class3homework.csv")
df
summary(df)
library(tibble)
data3 <- as_tibble(df)
df
data3
install.packages("xlsx")
install.packages("readxl")
install.packages("tidyverse")
library(readxl)
View("~/Desktop/WFED 540 FA17/WFED540sept112017/WFED540Class3Homework/WFED540RJF227class3homework.xlsx")
df <- read_excel("~/Desktop/WFED 540 FA17/WFED540sept112017/WFED540Class3Homework/WFED540RJF227class3homework.xlsx")
mydata <- read_excel ("~/Desktop/WFED 540 FA17/WFED540sept112017/WFED540Class3Homework/WFED540RJF227class3homework.xlsx" ,sheet = "sheet1") 
df
summary(df)
library(dplyr)
Table_xlsx_ <- read_excel("~/Desktop/WFED 540 FA17/WFED540sept112017/WFED540Class3Homework/WFED540RJF227class3homework.xlsx")
Table_xlsx_ <- tbl_df(Table_xlsx_)
Table_xlsx_
summary(Table_xlsx_)