In abhinav-piplani/Assignment1:

Vignette Info

This vignette provides a meaningful description of the package Assignment 1 and how it should be used. The usage of all the functions a re decsribed one by one

 library(Assignment1)
#setwd( paste0(system.file(package="Assignment1"),"/data"))
# opts_knit$set(root.dir=normalizePath('../'))
#knitr::opts_knit$set("data")

Read Data for accidents occuring in 2013

# attach(accidents.2013)
# mydata <- accidents.2013

#mydata <-read.csv(system.file(file.path("exdata","accident_2013.csv.bz2"), package="Assignment1"))
  #read.csv("accident_2013.csv.bz2")

mydata <- fars_read("accident_2013.csv.bz2")
#mydata <- fars_read(system.file(file.path("exdata","accident_2013.csv.bz2"), package="Assignment1"))
str(mydata)
#mydata <- fars_read_years(2014)

Generates a filename (character) in the format similar to other files given as a part of the 1st assignment of the course 'Building R Packages" on Coursera.

myfilename <- make_filename(2020)

Subsetting Year & Month variables from the data for 2014

  mydata <- fars_read_years(2014)
  #mydata <- fars_summarize_years(2013)
  str(mydata)

Summarizes Year & Month variables from the data for year 2014

 mydata <- fars_summarize_years(2014)
 str(mydata)

Plots accidents on a state map for state number 55, year 2013

 mydata <- fars_map_state(55, 2013)
  str(mydata)

abhinav-piplani/Assignment1 documentation built on May 27, 2019, 7:39 a.m.