Case Study Part -2 to 5.pdf - Case Study Part-2 install.packages\"readxl repos =\"https\/cran.cnr.berkeley.edu\/bin\/macosx\/el-capit

Case Study Part -2 to 5.pdf - Case Study Part-2...

This preview shows page 1 - 4 out of 22 pages.

Case Study Part -2 install.packages("readxl", repos = " an/contrib/3.5/readxl_1.1.0.tgz") ## Warning: unable to access index for repository acosx/el-capitan/contrib/3.5/readxl_1.1.0.tgz/src/contrib: ## cannot open URL ' /readxl_1.1.0.tgz/src/contrib/PACKAGES' ## Warning: package 'readxl' is not available (for R version 3.5.0) ## Warning: unable to access index for repository acosx/el-capitan/contrib/3.5/readxl_1.1.0.tgz/bin/macosx/el-capitan/contrib/3.5: ## cannot open URL ' /readxl_1.1.0.tgz/bin/macosx/el-capitan/contrib/3.5/PACKAGES' install.packages("xlsx", repos = " /contrib/3.5/rJava_0.9-10.tgz") ## Warning: unable to access index for repository acosx/el-capitan/contrib/3.5/rJava_0.9-10.tgz/src/contrib: ## cannot open URL ' /rJava_0.9-10.tgz/src/contrib/PACKAGES' ## Warning: package 'xlsx' is not available (for R version 3.5.0) ## Warning: unable to access index for repository acosx/el-capitan/contrib/3.5/rJava_0.9-10.tgz/bin/macosx/el-capitan/contrib/3.5: ## cannot open URL ' /rJava_0.9-10.tgz/bin/macosx/el-capitan/contrib/3.5/PACKAGES'
Image of page 1
library (readxl) BladeWeight <- read_excel("~/Documents/HU/ANL_500/Performance_Lawn_Equipment_Database .xlsx", sheet = "Blade Weight", skip = 1) EmployeeRetention <- read_excel("~/Documents/HU/ANL_500/Performance_Lawn_Equipment_Da tabase.xlsx", sheet = "Employee Retention", skip = 1) ###################### #Part1 End_User_Sat <- read_excel("~/Documents/HU/ANL_500/Performance_Lawn_Equipment_Databas e.xlsx", sheet = "End-User Satisfaction", skip = 1) Complaints <- read_excel("~/Documents/HU/ANL_500/Performance_Lawn_Equipment_Database. xlsx", sheet = "Complaints", skip = 1) #Count Number of NAs summary(Complaints) ## Month World NA ## Min. :2010-01-01 00:00:00 Min. :154.0 Min. : 84.0 ## 1st Qu.:2011-03-24 06:00:00 1st Qu.:216.0 1st Qu.:120.2 ## Median :2012-06-16 00:00:00 Median :244.0 Median :136.5 ## Mean :2012-06-16 01:36:00 Mean :248.9 Mean :136.0 ## 3rd Qu.:2013-09-08 12:00:00 3rd Qu.:282.2 3rd Qu.:152.2 ## Max. :2014-12-01 00:00:00 Max. :350.0 Max. :183.0 ## ## SA Eur Pac China ## Min. : 9.00 Min. :52.0 Min. : 0.000 Min. : 2.00 ## 1st Qu.:16.00 1st Qu.:70.0 1st Qu.: 6.000 1st Qu.: 4.00 ## Median :23.00 Median :79.0 Median : 9.000 Median : 5.00 ## Mean :23.08 Mean :77.4 Mean : 9.133 Mean : 5.50 ## 3rd Qu.:28.25 3rd Qu.:86.0 3rd Qu.:12.250 3rd Qu.: 6.25 ## Max. :43.00 Max. :98.0 Max. :19.000 Max. :11.00 ## NA's :24
Image of page 2
#Next identify the NA rows. is.na(Complaints$Month) ## [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE ## [12] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE ## [23] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE ## [34] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE ## [45] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE ## [56] FALSE FALSE FALSE FALSE FALSE #Next reverse the vector of true/false using a boolean-not operator.
Image of page 3
Image of page 4

You've reached the end of your free preview.

Want to read all 22 pages?

  • Spring '18
  • Max, Na Na Hey Hey Kiss Him Goodbye, Qu.

  • Left Quote Icon

    Student Picture

  • Left Quote Icon

    Student Picture

  • Left Quote Icon

    Student Picture

Stuck? We have tutors online 24/7 who can help you get unstuck.
A+ icon
Ask Expert Tutors You can ask You can ask You can ask (will expire )
Answers in as fast as 15 minutes