daniel/VHK
1
0
Fork 0
Code Issues Pull Requests Activity

Überschriften präzisiert.

Browse Source
This commit is contained in:
daniel 2019-01-01 18:06:11 +01:00
parent 6b3df60e4c
commit 95842e5085
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
vhk.Rmd
View File

@ -154,7 +154,7 @@ raw_data %>% filter(!is.na(RemovalDate)) %>%
--> -->
## Alter der Patienten ## Alter der Patienten bei Implantation
```{r patient_age} ```{r patient_age}
raw_data %>% raw_data %>%
ggplot(aes(group = Year, x = Year, y = Age)) + ggplot(aes(group = Year, x = Year, y = Age)) +
@ -165,7 +165,7 @@ raw_data %>%
labs(x = NULL, y = "Jahre") labs(x = NULL, y = "Jahre")
``` ```
## Geschlecht der Patienten ## Geschlecht der Patienten bei Implantation
```{r patient_sex} ```{r patient_sex}
raw_data %>% group_by(Year) %>% summarise(PercentFemale = sum(Sex == "weiblich") / n()) %>% raw_data %>% group_by(Year) %>% summarise(PercentFemale = sum(Sex == "weiblich") / n()) %>%
ggplot(aes(x = Year, y = PercentFemale)) + ggplot(aes(x = Year, y = PercentFemale)) +