我试图通过计算12个不同列的空数和响应数(值+ NA
)来汇总我的数据。 (在此示例中重命名)
数据:
my_df <- structure(list(SCR1 = c(100, 80.2, 70.3,
90.1, 100, 100, 100, 100, 40.6, 80.2, 80.2, 90.1, 30.7, 100,
80.2), SCR2 = c(75.25, 75.25, 75.25, 75.25, 75.25, 75.25,
100, 100, 50.5, 50.5, 75.25, 50.5, 50.5, 100, 50.5), SCR3 = c(100,
100, 100, 100, 75.25, 75.25, 100, 100, 100, 75.25, 100, 100,
NA, 100, 75.25), SCR4 = c(100, 50.5,
50.5, 75.25, 100, 75.25, 100, 100, 100, 75.25, 50.5, 100, 100,
100, 75.25), SCR5 = c(100, 75.25, 50.5,
75.25, 100, 75.25, 100, 100, 50.5, 75.25, 75.25, 75.25, 25.75,
100, 75.25), SCR6 = c(100, 25.75, 50.5,
75.25, 100, 75.25, 100, 100, 75.25, 75.25, 75.25, 100, 50.5,
100, 50.5), SCR7 = c(75.25, 50.5, 75.25,
100, 50.5, 75.25, 100, 100, 75.25, 50.5, 75.25, 100, 25.75, 100,
75.25), SCR8 = c(75.25, 75.25, 50.5, 75.25,
75.25, 75.25, 100, 100, 75.25, 75.25, 75.25, 75.25, 50.5, 100,
75.25), SCR9 = c(50.5, NA, NA, 25.75, 100, NA,
NA, NA, 100, NA, NA, NA, 75.25, NA, NA), SCR10 = c(25.75,
NA, NA, NA, NA, 1, NA, NA, NA, NA, NA, NA, NA, NA, NA), SCR11 = c(100,
75.25, 50.5, 75.25, 100, 75.25, 100, 100, 75.25, 75.25, 75.25,
100, 50.5, 100, 50.5), SCR12 = c(75.25, 75.25,
50.5, NA, 75.25, 75.25, 100, 100, 75.25, NA, 75.25, 75.25, 50.5,
100, 50.5), ID = 1:15), row.names = c(NA, 15L), class = "data.frame")
在这里,我想返回值的数量和NA
的数量,然后返回百分比NA
我找到了一种计算NA
数量的解决方案,但是我很难添加带有计数和百分比的第二/第三列。
my_df %>%
map_df(function(x) sum(is.na(x))) %>%
gather(feature, num_nulls) %>%
dplyr::arrange(desc(num_nulls))
如何添加计数和不适用百分比?我正在尝试使用tidyverse并避免使用SQL。
答案 0 :(得分:3)
您快到了。可以使用其他mutate
语句创建另外两列:
my_df %>%
map_df(function(x) sum(is.na(x))) %>%
gather(feature, num_nulls) %>%
dplyr::arrange(desc(num_nulls)) %>%
mutate(num_responses = nrow(my_df) - num_nulls,
percent = num_responses/nrow(my_df))