log4r包MongoDB集成问询：是否存在可推送日志至MongoDB的appender

• log4r官方目前没有内置专门的MongoDB Appender，原生仅提供console和file两类默认Appender。
• 你可以基于log4r的自定义Appender扩展能力，搭配MongoDB的R语言驱动包自行实现，参考实现代码如下：

# 引入依赖
library(log4r)
library(mongolite)

# 实现自定义MongoDB Appender
mongo_appender <- function(
  mongo_url = "mongodb://localhost:27017",
  db = "log_db",
  collection = "service_logs"
) {
  # 初始化MongoDB连接
  mg <- mongo(collection = collection, db = db, url = mongo_url)
  
  return(function(level, msg) {
    # 构造日志结构化数据
    log_data <- list(
      time = Sys.time(),
      log_level = log4r:::level_name(level),
      content = msg
    )
    # 写入MongoDB
    mg$insert(log_data)
  })
}

# 调用示例
# 初始化带MongoDB Appender的日志对象
logger <- logger(
  level = "INFO",
  appenders = list(mongo_appender())
)

# 写入测试日志
info(logger, "测试日志已写入MongoDB")

高并发场景下建议优化上述实现，增加日志批量写入、异常兜底逻辑，避免单次写入性能过低或写入失败丢失日志。

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