Skip to contents

Convenience alias: full TPS capsule on the Assault dataset.

Usage

morie_tps_analyze_assault(df)

morie_tps_analyze_autotheft(df)

morie_tps_analyze_bicycletheft(df)

morie_tps_analyze_breakandenter(df)

morie_tps_analyze_communitysafetyindicators(df)

morie_tps_analyze_hatecrimes(df)

morie_tps_analyze_homicides(df)

morie_tps_analyze_intimatepartnerandfamilyviolence(df)

morie_tps_analyze_neighbourhoodcrimerates(df)

morie_tps_analyze_robbery(df)

morie_tps_analyze_shootingandfirearmdiscarges(df)

morie_tps_analyze_theftfrommovingvehicle(df)

morie_tps_analyze_theftover(df)

Arguments

df

A TPS Assault data.frame.

Value

A morie_tps_result.

Examples

set.seed(1)
df <- data.frame(
  OCC_YEAR  = sample(2018:2024, 200, replace = TRUE),
  OCC_MONTH = sample(1:12, 200, replace = TRUE),
  OCC_DOW   = sample(c("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun"),
                     200, replace = TRUE),
  OCC_HOUR  = sample(0:23, 200, replace = TRUE),
  DIVISION  = sample(paste0("D", 11:55), 200, replace = TRUE),
  HOOD_158  = sample(letters[1:20], 200, replace = TRUE),
  OFFENCE   = sample(c("Assault", "Theft"), 200, replace = TRUE),
  LAT_WGS84  = 43.6 + runif(200, 0, 0.2),
  LONG_WGS84 = -79.4 + runif(200, 0, 0.2),
  stringsAsFactors = FALSE
)
res <- morie_tps_analyze_assault(df)
class(res)
#> [1] "morie_tps_result"  "morie_rich_result" "list"