Data Science Desktop Survival Guide by Graham Williams
Desktop Survival Project Home Preface Data Science Introducing R R Constructs R Tasks R Strings R Read, Write, and Create Data Template Data Exploration Data Wrangling Data Visualisation Statistics ML Template ML Scenarios ML Activities ML Applications ML Algorithms Cluster Analysis Decision Trees Computer Vision Graph Data Privacy Literate Data Science Coding with Style Resources Bibliography Index

CLICK HERE TO VISIT THE UPDATED SURVIVAL GUIDE

Excel Data Read

20200104 Microsoft Excel spreadsheets are supported by readxl which provides readxl::read_excel(). A common requirement is to skip= the first few lines of the spreadsheet which might be taken up with logos and file meta data. A specific sheet can be chosen with sheet=2 to select the second sheet or sheet="expenses" to select a named sheet. A specific range within a sheet is selected using range=. The package also provides readxl::excel_format() and readxl::excel_sheets().

Below we read data from the Sydney tab of the weatherAUS.xlsx spreadsheet created in Section 6.5.

library(magrittr)     # Data pipelines: %>% %<>% %T>% equals().
library(glue)         # Format strings: glue().
library(readxl)       # Read Excel spreadsheets: read_excel().

dsname <- "weatherAUS"
dstype <- "xlsx"
fsep   <- .Platform$file.sep

getwd() %>%
  glue("{fsep}{dsname}.{dstype}") %T>%
  print() ->
dspath

## /home/kayon/git/bitbucket/kayontoga/onepager/weatherAUS.xlsx

dspath %>% excel_format()

## [1] "xlsx"

dspath %>% excel_sheets()

##  [1] "Adelaide"         "Albany"           "Albury"          
##  [4] "AliceSprings"     "BadgerysCreek"    "Ballarat"        
##  [7] "Bendigo"          "Brisbane"         "Cairns"          
## [10] "Canberra"         "Cobar"            "CoffsHarbour"    
## [13] "Dartmoor"         "Darwin"           "GoldCoast"       
## [16] "Hobart"           "Katherine"        "Launceston"      
....

dspath %>%
  read_excel(sheet="Sydney") %>%
  assign(dsname, ., globalenv())