我想在R PlumberAPI中添加一个过滤器,它可以通过一个错误的非定位URL

我想在R PlumberAPI中添加一个过滤器,它可以通过一个错误的非定位URL,r,api,plumber,R,Api,Plumber,需要一个过滤器,它可以显示带有错误代码的非响应url #* Return LDA of all sites #* @param a Enter your Website #* @param b:[chr] Enter URLs #* @param v The focused keyword #* pr_set_error(pr, fun) function(req, res){ if (req$b== FALSE){ r

需要一个过滤器,它可以显示带有错误代码的非响应url

    #* Return LDA of all sites
    #* @param a Enter your Website
    #* @param b:[chr] Enter URLs
    #* @param v The focused keyword
    #* pr_set_error(pr, fun)
    function(req, res){
      if (req$b== FALSE){
        res$status <- 500 # Unauthorized
        return(list(error="Unresponsive URL"))
      } else {
        plumber::forward()
      }
    }
    #* @post  /LDA
    
    function(a,b,v) {

#calculation}
#*返回所有站点的LDA
#*@param a进入您的网站
#*@param b:[chr]输入URL
#*@param v聚焦关键字
#*pr_设置_错误(pr,fun)
功能(req、res){
如果(请求$b==FALSE){

res$status我在这里疯狂地猜测

#* Return LDA of all sites
#* @param a Enter your Website
#* @param b:[chr] Enter URLs
#* @param v The focused keyword
#* @post  /LDA
function(a,b,v) {
  #calculation
}

#* @filter unresponsive_url
function(req, res){
  if (any(req$args$b == FALSE)) {
    res$status <- 500 # Unauthorized
    return(list(error="Unresponsive URL"))
  } else {
    plumber::forward()
  }
}
#*返回所有站点的LDA
#*@param a进入您的网站
#*@param b:[chr]输入URL
#*@param v聚焦关键字
#*@post/LDA
功能(a、b、v){
#算计
}
#*@filter无响应\u url
功能(req、res){
如果(有(请求$args$b==FALSE)){

res$status可以详细说明您的问题吗?水管工将在“无响应”url上返回404状态。这是您想要更改的吗?是的。这是正确的方法还是您想要添加的内容?基本上我想检查用户提供的有效响应url是否正确?在进行任何计算之前