我想為實際上在相應變數藍線上方某處有任何缺失值的每個變數注釋缺失值的百分比。我可以使用 geom_text 添加文本,但我很難使用 Nas 選擇這些變數。我將不勝感激任何提示。

library(ggplot2)
library(naniar)
gg_miss_var(airquality) labs(y = "Look at all the missing ones")
uj5u.com熱心網友回復:
您可以使用naniar::miss_var_summary()為具有至少一個的所有變數創建一個帶有標簽的資料框NA:
df <- miss_var_summary(airquality) %>%
dplyr::filter(n_miss > 0) %>%
dplyr::mutate(pct_label = paste0(round(pct_miss, 1), '%'))
然后,您可以在您的geom_text()行內使用此資料框:
gg_miss_var(airquality)
geom_text(data = df, aes(x = as.factor(variable), y = n_miss, label = pct_label),
vjust = 1.5)
labs(y = "Look at all the missing ones")

轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/427666.html
