dplyr/ggplot2: na değerlerini içeren yığılmış çubuklarla zaman grafiği

Question

Dplyr ve ggplot2 ile na değerleri içeren yığılmış bir barplotu nasıl yapabilirim?

x Eksen: Yıl
Y Ekseni: ne denedim NA'nın gözlemlerin numaraları ve sayıları

data <- data.frame(year = c(2015, 2015, 2016, 2016), 
        column2 = c(4, NA, 9, 1)) 


library (dplyr) 

missing_data <- data %>% 
        count(year, complete.cases(column2)) 

Benim sonuçları

year complete.cases(column2)  n 
(dbl)      (lgl) (int) 
1 2015     FALSE  1 
2 2015     TRUE  1 
3 2016     TRUE  2 

:

library(ggplot2) 
na_plot <- ggplot (missing_data, aes(x=year, y=n)) 
na_plot+ 
geom_bar(stat="identity", aes(fill = complete.cases(column2)) 

Answer 1

bence complete.cases işlevi, bir şekilde variab ile çakışıyor le adı. Deneyin adlandırma (ayrıca factoryear):

data <- data.frame(year = c(2015, 2015, 2016, 2016), 
        column2 = c(4, NA, 9, 1)) 

library(dplyr) 
library(ggplot2) 

missing_data <- data %>% 
    count(year, complete.cases(column2)) 

names(missing_data)[2] = "col2" 

na_plot <- ggplot(missing_data, aes(x=factor(year), y=n)) 
na_plot + geom_bar(stat="identity", aes(fill = col2))