如何在R Shiny应用中运行IPDfromKM包的getpoints()坐标采集函数

• 正在将自研R代码迁移为Shiny应用，核心依赖IPDfromKM包的getpoints()函数
• getpoints()在常规R环境中可正常运行：生成绘图后，引导用户依次点击X/Y轴极值点及KM曲线，最终将点击坐标提取为数据框，但迁移至Shiny平台后完全无法正常工作
• 已尝试使用plotOutput()、imageOutput()组件及对应响应式逻辑，均未解决问题
• 拆解getpoints()功能后发现，它整合了三个核心操作：展示上传的图片、支持用户点击并存储多个坐标点、返回整理后的坐标数据框，目前不确定是否需要将这三个功能拆分后分步实现
• 已获取getpoints()源码、自研Shiny代码，且存在官方开发的同功能可用Shiny应用示例

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