R Geom 抖动标记点

问：

我正在制作一个与房地产相关的抖动数字。绘制的变量是建筑物和拖欠状态（例如，太小、太小、中、太高、太高），这是一个因素。在数据集中，我还有居民的姓名和他所欠的余额。

这是图表：

我想添加此图表中包含的居民姓名。

我尝试使用：

geom_text(aes(label=resident))

我以前用过这个，但它似乎不起作用，它向我展示了这个警告。

In argument: balance = as.integer(gsub("\\$", "", balance))

各自的名称应放在点的一边。代码如下：

eigpm %>% clean_names() %>%
  mutate(d_status = str_sub(eigpm$Delinquency.Status,1,2)) %>%
  mutate(balance = as.integer(gsub("\\$", "", balance)),
         d_status = as.integer(d_status)
         ) %>%
  mutate(property_name = as.factor(property_name)) %>%
  mutate(delinquency_status = as.factor(delinquency_status)) %>%
  arrange(desc(balance)) %>%
  filter(! is.na(delinquency_status)) %>%
  filter(delinquency_status!="") %>%
  ggplot(aes(x=property_name, y=d_status, color=property_name, size=balance)) +
  geom_jitter(alpha=0.5) +
  scale_y_continuous(breaks = c(1:11)) +
  theme(axis.text.x = element_text(angle=90),
        legend.position = "bottom") +
  labs(x= "Properties", y="Delinquency Status") +
  guides(color=F) +
  geom_text(aes(label=resident))