Skip to content

Commit 586cab3

Browse files
committed
labels
1 parent d8876f8 commit 586cab3

File tree

7 files changed

+21
-9
lines changed

7 files changed

+21
-9
lines changed

docs/articles/a3srb.html

Lines changed: 1 addition & 1 deletion
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.
2.52 KB
Loading

docs/articles/a4reprofemales.html

Lines changed: 5 additions & 1 deletion
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.
-96.3 KB
Loading
105 KB
Loading

docs/pkgdown.yml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -9,5 +9,5 @@ articles:
99
a4reprofemales: a4reprofemales.html
1010
a5densitydependence: a5densitydependence.html
1111
a6projections: a6projections.html
12-
last_built: 2022-01-06T17:48Z
12+
last_built: 2022-01-06T17:57Z
1313

vignettes/a4reprofemales.Rmd

Lines changed: 14 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -77,16 +77,24 @@ ggplot(repro, aes(x = `age`, y = `year`, fill = ..x..)) +
7777
g1 = group_by(repro, year) %>% summarize(m = length(unique(animal)),SRKW="Total") %>%
7878
ggplot(aes(year, m, group=SRKW,color=SRKW)) + geom_line(col="black") + geom_point() +
7979
xlab("Year") + ylab("Reproductive aged females") +
80-
theme(axis.text.x = element_text(angle = 90, hjust = 1)) +
80+
scale_x_discrete(breaks=c("1980","1985","1990","1995","2000","2005","2010","2015","2020"),
81+
labels=c("1980","1985","1990","1995","2000","2005","2010","2015","2020"))+
82+
theme(axis.text.x = element_text(angle = 90, vjust = 0.5, hjust=1))+
8183
theme_bw()
84+
g1
85+
```
86+
87+
88+
```{r reprots-pod, fig.cap="Time series of reproductive age females (10-42, inclusive) for Southern Residents by pod and year since 1976. \\label{fig:ts-repro-females-pod}"}
8289
g2 = group_by(repro, year, pod) %>% summarize(m = length(unique(animal))) %>%
8390
ggplot(aes(year, m, group=pod, color=pod)) + geom_line() + geom_point() +
8491
xlab("Year") + ylab("Reproductive aged females") +
85-
theme(axis.text.x = element_text(angle = 90, hjust = 1)) + theme_bw() +
92+
scale_x_discrete(breaks=c("1980","1985","1990","1995","2000","2005","2010","2015","2020"),
93+
labels=c("1980","1985","1990","1995","2000","2005","2010","2015","2020"))+
94+
theme(axis.text.x = element_text(angle = 90, vjust = 0.5, hjust=1))+
95+
theme_bw()+
8696
scale_color_viridis(discrete = TRUE, end = 0.8) +
8797
scale_fill_viridis(discrete = TRUE, end = 0.8)
88-
gridExtra::grid.arrange(g1, g2, ncol = 1) +
89-
theme(axis.text.x = element_text(angle = 90, vjust = 0.5, hjust=1))
90-
91-
98+
g2
9299
```
100+

0 commit comments

Comments
 (0)