R 当不适用时，为轴勾选一个新名称

我有一个三轴刻度的条形图，其中一个是NA。虽然我可以重命名两个“非NA”轴标记，但我无法为名为“NA”的轴标记指定新名称

我该怎么做

在下面的示例中，“No”可以重命名为“test”，但“NA”不能重命名为“Unknown”：

库（ggplot2）
图书馆（tibble）
数据图%
添加行（Class=“Crew”，
性别=“女性”，
Age=“成人”，
生存=NA，
频率=20）
ggplot（数据图，aes（x=因子（存活），
y=系数（性别），
填充=系数（等级），
颜色=系数（类别）））+
几何图形栏（position=“dodge”，stat=“identity”）+
比例x离散（标签=c（“否”=“测试”），
“NA”=“未知”））

使用fct\u explicit\u na的解决方案

library(forcats)
data_plot <- as.data.frame(Titanic) %>%
  add_row(Class = "Crew",
          Sex = "Female",
          Age = "Adult",
          Survived = NA,
          Freq = 20)

ggplot(data_plot, aes(x = fct_explicit_na(Survived,na_level = "Unknown"),  
                      y = factor(Sex),
                      fill = factor(Class),
                      color = factor(Class))) +
  geom_bar(position = "dodge", stat = "identity") +
  scale_x_discrete(labels = c("No" = "test"))

库（用于猫）
数据图%
添加行（Class=“Crew”，
性别=“女性”，
Age=“成人”，
生存=NA，
频率=20）
ggplot（数据图，aes（x=fct\u显式）na（存活，na水平=“未知”），
y=系数（性别），
填充=系数（等级），
颜色=系数（类别）））+
几何图形栏（position=“dodge”，stat=“identity”）+
比例x离散（标签=c（“否”=“测试”））

library(forcats)
data_plot <- as.data.frame(Titanic) %>%
  add_row(Class = "Crew",
          Sex = "Female",
          Age = "Adult",
          Survived = NA,
          Freq = 20)

ggplot(data_plot, aes(x = fct_explicit_na(Survived,na_level = "Unknown"),  
                      y = factor(Sex),
                      fill = factor(Class),
                      color = factor(Class))) +
  geom_bar(position = "dodge", stat = "identity") +
  scale_x_discrete(labels = c("No" = "test"))