Chapter 48 Outcomes and Products associated with Adverse Events

We examine the Products associated with the following outcomes

  • Death
  • Death for persons 70 and above
  • Disability

We find causes of deaths to be primarily caused by

  • Raw Oysters
  • Axon
  • Benefiber with Wheat Dextrin
  • 5 Hour Energy
  • Shower to Shower Powder

48.1 Death Products

keywordOutcome = "DEATH"
 
OutcomeSpecificEvents = AdverseFoodEvents %>%
  filter(str_detect(Outcomes,keywordOutcome))

OutcomeSpecificEvents %>%
  filter(ProductName != "REDACTED") %>%
  PlotProducts(fillColorName = "red")

Why would someone eat Raw Oysters ?

48.2 Death Products for Age 70 and Above

keywordOutcome = "DEATH"
 
OutcomeSpecificEvents = AdverseFoodEvents %>%
  filter(str_detect(Outcomes,keywordOutcome))

OutcomeSpecificEvents %>%
  mutate(AgeAtAdverseEventInYears = as.integer(AgeAtAdverseEventInYears)) %>%
  filter(AgeAtAdverseEventInYears >= 70) %>%
  filter(ProductName != "REDACTED") %>%
  PlotProducts(fillColorName = "red")

48.3 Disability Products

keywordOutcome = "DISABILITY"
 
OutcomeSpecificEvents = AdverseFoodEvents %>%
  filter(str_detect(Outcomes,keywordOutcome))

OutcomeSpecificEvents %>%
  PlotProducts(fillColorName = fillColor2)