-
Notifications
You must be signed in to change notification settings - Fork 2
New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
Project_Feedback_gbream #2
base: master
Are you sure you want to change the base?
Changes from all commits
File filter
Filter by extension
Conversations
Jump to
Diff view
Diff view
There are no files selected for viewing
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -1,17 +1,17 @@ | ||
--- | ||
title: "Opoid-Related Deaths in New York State" | ||
author: "Anuwat Pengput" | ||
subtitle: Spatial Epidemiological Analysis and Risk Factors of Opoid-Related Deathsin | ||
subtitle: Spatial Epidemiological Analysis and Risk Factors of Opoid-Related Deaths in | ||
New York | ||
output: | ||
html_document: | ||
df_print: paged | ||
--- | ||
|
||
# Introduction | ||
# Introduction | ||
Opioid analgesics are pain relievers derived from opium or have an opium-like activity. There are no better drugs than opioids for treating severe pain and suffering, however, opioids are the main drugs associated with overdose deaths. Opioid prescription rates have increased almost threefold associated with an increase of opioid related overdoses and deaths in the last 15 years. New York has been greatly impacted by the opioid epidemic. The rate of deaths related to any opioid in New York has increased by 210% from 2010 to 2016. The opioid overdose death rate in the overall state was 18 deaths per 100,000 residents, which was higher than many states in the United States. | ||
|
||
# Materials and methods | ||
# Materials and methods | ||
There was a problem hiding this comment. Choose a reason for hiding this commentThe reason will be displayed to describe this comment to others. Learn more. Good! |
||
|
||
|
||
1. Download all packages | ||
|
@@ -60,7 +60,7 @@ vital_ny_2017 <- ny_sep %>% | |
``` | ||
|
||
|
||
```{r, fig.height=10, fig.width=8} | ||
```{r, fig.height=10, fig.width=8} | ||
g <- ggplot (data = vital) + | ||
geom_line(aes(x = Year, y = Opioid.Poisoning.Deaths, group = County, col = County)) + | ||
geom_point(aes(x = Year, y = Opioid.Poisoning.Deaths, group = County, col = County, size = Opioid.Poisoning.Deaths)) + | ||
|
@@ -78,7 +78,7 @@ summary(fit) | |
``` | ||
|
||
|
||
# Results | ||
# Results | ||
There was a problem hiding this comment. Choose a reason for hiding this commentThe reason will be displayed to describe this comment to others. Learn more. The interactivity of the first plot is a great touch, as it allows you to see specific opoid related deaths in each county upon hovering over the points. The plot is also very busy with all NY counties represented and often times overlapping and with very similar coloring. Maybe breaking this up into several plots, each with several counties grouped by region would help to get rid of some of the clutter. Or maybe using facet_wrap(), but that would also create a large number of plots that couldn't be compared to each other as easily. |
||
|
||
Show tables, plots, etc. and describe them. | ||
|
||
|
@@ -102,7 +102,7 @@ ggPredict(fit,se=TRUE,interactive=TRUE) | |
``` | ||
|
||
# Conclusions | ||
I learned how to prepare data, create plots for final porject. | ||
I learned how to prepare data, create plots for final project. | ||
|
||
|
||
# References | ||
# References | ||
There was a problem hiding this comment. Choose a reason for hiding this commentThe reason will be displayed to describe this comment to others. Learn more. Add references |
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.
There's a lot of information here that lays the foundation for the analysis to come. It could be improved by honing in on a central question to be answered.