In nandinigntr/MSDR: Mastering Software Development in R

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

library(magrittr)
library(dplyr)
library(readr)
library(kableExtra)
library(msdr)

Table of Contents

• 1. Introduction
• 2. Example

1. Introduction {#intro}

This function creates a new column with the earthquake LOCATION. The function eq_clean_data uses it behind the scenes, so it is not necessary to call this function after call eq_clean_data.

Example {#example}

Piping a raw data to creates a LOCATION column.

# Path to the raw data.
raw_data_path <- system.file("extdata", "signif.txt", package = "msdr")
# Loading the dataset of Earthquake.
df <- readr::read_delim(file = raw_data_path,      
                        delim = '\t',              
                        col_names = TRUE,          
                        progress = FALSE,           
                        col_types = readr::cols())
# Printing some columns.
df %>%
       eq_location_clean() %>%
              # Selecting some features.
              select(YEAR,
                     COUNTRY,
                     LOCATION,
                     EQ_PRIMARY,
                     TOTAL_DEATHS) %>% 
                     # Filtering.
                     filter(YEAR > 1990 &
                            YEAR < 2019) %>%
                            # Show the first 10 rows.
                            head(10) %>%
                                   # Enhance table visualization.
                                   kable()

As you can see, the LOCATION column has only cities in Title Case mode.

nandinigntr/MSDR documentation built on Jan. 1, 2021, 11:32 a.m.