因此,我创建了变量chart3
,以过滤SEX
和year(MULTYEAR
)的原始数据。我通过AGE
和Schulbildung
创建了一个小组。我还总结了Schulbildung
小于12。问题是因为变量'Schulbildung'包含类似8、9 a.s.o
Schulbildung < 12
的中位数是错误的。 {oder值Schulbildung
的中位数是正确的。
chart3 <- Datengf %>% # Datensatz gefiltert für Männer
filter(SEX == 1 & MULTYEAR == 2017)%>%
group_by(AGE,Schulbildung) %>%
summarise(medianincome = median(INCWAGE))%>%
ungroup()%>%
mutate(Schulbildung = ifelse(Schulbildung < 12, "<12", Schulbildung)) %>%
group_by(Schulbildung,AGE)%>%
summarise(medianincome = mean(sum(medianincome)))