-
Notifications
You must be signed in to change notification settings - Fork 71
/
RobHyndman_1page.qmd
103 lines (85 loc) · 2.55 KB
/
RobHyndman_1page.qmd
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
---
name: Rob J Hyndman
address: "Department of Econometrics & Business Statistics,\\tabularnewline Monash University, VIC 3800, Australia."
www: robjhyndman.com
phone: +61 3 9905 5141
email: "[email protected]"
twitter: robjhyndman
github: robjhyndman
date: "`r format(Sys.Date(), '%B %Y')`"
date-format: "MMMM YYYY"
position: FAA, FASSA, BSc (Hons), PhD, AStat
format: cv-pdf
pdf-engine: latexmk
header-includes:
- \geometry{left=1.5cm,right=1.5cm,top=1.8cm,bottom=1.7cm}
- \definecolor{headcolor}{HTML}{000088}
---
\titlespacing{\section}{0pt}{1.ex}{0.5ex}
\fontsize{10}{11.5}\sf
\thispagestyle{empty}
\enlargethispage*{0.5cm}
```{r setup, include=FALSE}
knitr::opts_chunk$set(
echo = FALSE,
warning = FALSE,
message = FALSE,
cache = FALSE
)
library(dplyr)
library(RefManageR)
source("R/add_bib_section.R")
source("R/pretty.R")
# Remove any temporary bib file
if (fs::file_exists("temp.bib")) {
fs::file_delete("temp.bib")
}
targets::tar_load(c(pubs, rjh, rjhcites))
```
# Current position
```{r employment, results='asis'}
tribble(
~Years, ~Position,
"2003--", "\\textbf{Professor}, Department of Econometrics \\& Business Statistics, Monash University"
) %>%
baretable()
```
# Fellowships
* Fellow of the Australian Academy of Science (elected 2021).
* Fellow of the Academy of the Social Sciences in Australia (elected 2020).
* Fellow of the International Institute of Forecasters (elected 2021).
# Selected awards and honours
```{r awards, results='asis'}
awards <- tribble(
~Year, ~Award,
2021, "Pitman Medal, Statistical Society of Australia",
2007, "Moran Medal for Statistical Science, Australian Academy of Science"
) %>%
baretable()
```
# Selected books
```{r books}
#| output: asis
pubs[c("fpp3", "expsmooth08")] |>
add_bib_section(show_cites = TRUE, rjhcites=rjhcites)
```
\vspace*{-0.2cm}
# Selected papers
```{r}
# Count papers
npapers <- pubs %>%
as_tibble() |>
filter(!(type %in% c("book", "thesis", "review"))) %>%
NROW()
```
Since 1991 I have authored `r npapers` research papers or book chapters on statistical topics. Some highlights are listed below, with citations taken from Google Scholar on `r format(Sys.time(), "%e %B %Y")`. My h-index is `r rjh$All[2]` with total citations of `r prettyNum(rjh$All[1], big.mark=",")`.
```{r bibfile}
#| output: asis
pubs[c(
"tsibble", "globalforecasting", "fforma",
"smartmeterhts", "mint", "HF10", "DHS11", "hierarchical",
"VHNC10", "HK06", "HK08", "HKSG02", "HF96", "m3pca",
"HU07", "HDR96", "HB08"
)] |>
add_bib_section(show_cites = TRUE, rjhcites=rjhcites)
```