-
Notifications
You must be signed in to change notification settings - Fork 6
/
11_poster_professional.Rmd
221 lines (132 loc) · 7.59 KB
/
11_poster_professional.Rmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
---
title: "When is the State of the Union Delivered?"
author: "Dr. Evangeline (Gina) Reynolds^1^, James Smith^1,2^, and Jane Smith^3^"
institute: "1. Korbel School of International Studies at University of Denver; 2. Department and University Two; 3. Department and University Three"
date: "2018-11-30"
references:
- id: R-base
author:
- family: "R Core Team"
given: ""
title: 'R: A Language and Environment for Statistical Computing'
issued:
year: 2018
URL: https://www.r-project.org
- id: R-pagedown
author:
- family: Xie
given: Yihui
- family: Lesur
given: Romain
title: 'Paginate the HTML Output of R Markdown with CSS for Print'
issued:
year: 2018
URL: https://github.com/rstudio/pagedown
output:
pagedown::poster_jacobs:
self_contained: false
pandoc_args: --mathjax
---
<!-- In your final paper you won't often want to echo code. Or see warning or messages on coding at this point. So let's set the knitter setting to echo, warning and message to F globally -->
```{r setup, echo=FALSE, message=F, warning=F}
knitr::opts_chunk$set(echo = F, warning = F, message = F)
library(tidyverse)
```
Motivation {.block}
================================================================================
The State of the Union is an important summary of ...
It's delivery is most often in January, but with the 2019 government shutdown ...
Kenneth Bennoit raised the question about timing:
> Far from unprecedented for a #stateoftheunion #SOTU address to be held in Feb or to be delivered written.
Related Literature
================================================================================
Lorem ipsum dolor **sit amet**, consectetur adipiscing elit. Donec ut volutpat elit. Sed laoreet accumsan mattis. Integer sapien tellus, auctor ac blandit eget, sollicitudin vitae lorem. Praesent dictum tempor pulvinar. Suspendisse potenti. Sed tincidunt varius ipsum, et porta nulla suscipit et. Etiam congue bibendum felis, ac dictum augue cursus a. **Donec** magna eros, iaculis sit amet placerat quis, laoreet id est.
Category | Description
-----|------
Bad | Misrepresents data or confuse
Ugly | Not pleasing
Good | Not bad and not ugly
Table: This is the caption for the table about data visualization categories from *"The Fundamentals of Data Visualization."*
```{r, gm-plot, fig.width=6, fig.height=3, dev='svg', out.width='100%', fig.cap='Figure Caption.', echo=FALSE}
gapminder::gapminder %>% filter(year == 2007) %>%
ggplot() +
aes(gdpPercap, lifeExp) +
geom_point() +
theme_minimal()
```
Test citations @R-base @R-pagedown. See Figure \@ref(fig:gm-plot).
Theory
================================================================================
The following materials were required to complete the research:
- Curabitur pellentesque dignissim
- Eu facilisis est tempus quis
- Duis porta consequat lorem
- Eu facilisis est tempus quis
The materials were prepared according to the steps outlined below:
1. Curabitur pellentesque dignissim
1. Eu facilisis est tempus quis
1. Duis porta consequat lorem
1. Curabitur pellentesque dignissim
Hypotheses
================================================================================
Lorem ipsum dolor **sit amet**, consectetur adipiscing elit. Sed laoreet accumsan mattis. Integer sapien tellus, auctor ac blandit eget, sollicitudin vitae lorem. Praesent dictum tempor pulvinar. Suspendisse potenti. Sed tincidunt varius ipsum, et porta nulla suscipit et. Etiam congue bibendum felis, ac dictum augue cursus a. **Donec** magna eros, iaculis sit amet placerat quis, laoreet id est. In ut orci purus, interdum ornare nibh. Pellentesque pulvinar, nibh ac malesuada accumsan, urna nunc convallis tortor, ac vehicula nulla tellus eget nulla. Nullam lectus tortor, _consequat tempor hendrerit_ quis, vestibulum in diam. Maecenas sed diam augue.
Important Result {.block}
================================================================================
It is rare for the State of the Union, when it does not fall in an election year, to be delivered as late as February. However the addresses overall are getting later and later, and the 2019 address timing does not represent an outlying case.
Data
================================================================================
::: {.figure-example}
```{r year, fig.cap = "Timing of state of the union by year. SOTUs that follow election years are colored with blue.", fig.align='center'}
# Include the figure that you have saved out in working files
knitr::include_graphics("figures/sotu_timing_delivery.png")
```
Figure 2: Figure caption.
:::
Nunc tempus venenatis facilisis. Curabitur suscipit consequat eros non porttitor. Sed a massa dolor, id ornare enim:
Model
================================================================================
```{r regtable, results = "asis"}
# load models that have been saved in .Rdata file previously
load("data_products/models.Rdata")
stargazer::stargazer(lateness_by_year,
lateness_following_election, lateness_full, lateness_full_interaction,
dep.var.labels = "Days elapsed since January 1st",
covariate.labels = c("year", "post election", "year*post election"),
title = "Predicting State of the Union Timing",
style = "qje",
omit.stat = "all",
type = "html")
```
<!-- Nam quis odio enim, in molestie libero. Vivamus cursus mi at nulla elementum sollicitudin. Nam quis odio enim, in molestie libero. Vivamus cursus mi at nulla elementum sollicitudin. -->
<!-- \begin{equation} -->
<!-- E = mc^{2} -->
<!-- (\#eq:Einstein) -->
<!-- \end{equation} -->
<!-- Nam quis odio enim, in molestie libero. Vivamus cursus mi at nulla elementum sollicitudin. Nam quis odio enim, in molestie libero. Vivamus cursus mi at nulla elementum sollicitudin. -->
<!-- \begin{equation} -->
<!-- \cos^3 \theta =\frac{1}{4}\cos\theta+\frac{3}{4}\cos 3\theta -->
<!-- (\#eq:refname) -->
<!-- \end{equation} -->
<!-- Nam quis odio enim, in molestie libero. Vivamus cursus mi at nulla elementum sollicitudin. Nam quis odio enim, in molestie libero. Vivamus cursus mi at nulla elementum sollicitudin. -->
<!-- \begin{equation} -->
<!-- \kappa =\frac{\xi}{E_{\mathrm{max}}} -->
<!-- \end{equation} -->
<!-- Nam quis odio enim, in molestie libero. Vivamus cursus mi at nulla elementum sollicitudin. Nam quis odio enim, in molestie libero. Vivamus cursus mi at nulla elementum sollicitudin. -->
Conclusions
================================================================================
::: {.figure-example}
```{r model, fig.cap = "Timing of state of the union by year", fig.align='center'}
# Include the figure that you have saved out in working files
knitr::include_graphics("figures/sotu_timing_model.png", dpi = 250)
```
:::
Key References
================================================================================
<div id="refs"></div>
```{r}
download.file("https://onedrive.live.com/view.aspx?resid=43EBDBC5D5265516!12284&ithint=file%2cxlsx&app=Excel&authkey=!AHoBkJE4yhL8sOI", "temp.xlsx")
```
Data sources {data-color=red}
================================================================================
Nam mollis tristique neque eu luctus. Suspendisse rutrum congue nisi sed convallis. Aenean id neque dolor. Pellentesque habitant morbi tristique senectus et netus et malesuada fames ac turpis egestas.
Nam mollis tristique neque eu luctus. Suspendisse rutrum congue nisi sed convallis. Aenean id neque dolor. Pellentesque habitant morbi tristique senectus et netus et malesuada fames ac turpis egestas.