调用editData函数及点击编辑/添加按钮时报错，已排查仍未解决

已执行的排查操作：

• 重新加载editData包及其所有依赖库
• 确认当前使用R 4.2.1与R Studio 2022.07.1 Build 554（均为最新版本）
• 搜索相关错误代码但未找到可行解决方案
• 重启R及R Studio
• 此前多次运行该代码均无异常，目前陷入困境，请求协助

运行的代码：

comp_data01 <- editData(hood_data)

返回的错误信息：

Listening on http://127.0.0.1:6527
Warning: Error in if: missing value where TRUE/FALSE needed
  3: shiny::runApp
  2: runGadget
  1: editData

内容的提问来源于stack exchange，提问作者Joseph Harvard