prepare_Rd: invalid non-character version specification 'x' (type: double)
Calls:
 1: tools:::.check_package_parseRd(".", minlevel = -1)
 2: tryCatch(suppressMessages(checkRd(f, encoding = enc, def_enc = def_enc, macros = macros, stages = c("build", "install", "render"))), error = identity)
 3: tryCatchList(expr, classes, parentenv, handlers)
 4: tryCatchOne(expr, names, parentenv, handlers[[1L]])
 5: doTryCatch(return(expr), name, parentenv, handler)
 6: suppressMessages(checkRd(f, encoding = enc, def_enc = def_enc, macros = macros, stages = c("build", "install", "render")))
 7: withCallingHandlers(expr, message = function(c) if (inherits(c, classes)) tryInvokeRestart("muffleMessage"))
 8: checkRd(f, encoding = enc, def_enc = def_enc, macros = macros, stages = c("build", "install", "render"))
 9: withCallingHandlers({
        prepare_Rd(Rd, defines = defines, stages = stages, warningCalls = FALSE, ..., msglevel = 1)
    }, warning = .whandler)
10: prepare_Rd(Rd, defines = defines, stages = stages, warningCalls = FALSE, ..., msglevel = 1)
11: processRdSexprs(Rd, stage, options, macros = attr(Rd, "macros"))
12: expandDynamicFlags(recurse(block), options)
13: recurse(block)
14: getDynamicFlags(block)
15: recurse(block)
16: recurse(block[[i]])
17: recurse(block[[i]])
18: recurse(block[[i]])
19: recurse(block[[i]])
20: recurse(block[[i]])
21: processRdChunk(block, stage, options, env, macros = macros)
22: evalWithOpt(ce, options, env)
23: tryCatch(withVisible(eval(expr, env)), error = function(e) e)
24: tryCatchList(expr, classes, parentenv, handlers)
25: tryCatchOne(expr, names, parentenv, handlers[[1L]])
26: doTryCatch(return(expr), name, parentenv, handler)
27: withVisible(eval(expr, env))
28: eval(expr, env)
29: eval(expr, env)
30: generics:::methods_rd("as.factor")
31: methods_find(x)
32: help_path(info$method, info$package)
33: mapply(locate_help_doc, x, package, SIMPLIFY = FALSE)
34: (function (x, package) 
    {
        help <- if (requireNamespace("pkgload", quietly = TRUE)) {
            shim_help <- get("shim_help", asNamespace("pkgload"))
            function(x, package = NULL) {
                tryCatch(expr = shim_help(x, (package)), error = function(e) character())
            }
        }
        else {
            utils::help
        }
        if (is.na(package)) {
            help(x)
        }
        else {
            help(x, (package))
        }
    })(dots[[1L]][[1L]], dots[[2L]][[1L]])
35: requireNamespace("pkgload", quietly = TRUE)
36: tryCatch(loadNamespace(package, ...), error = function(e) e)
37: tryCatchList(expr, classes, parentenv, handlers)
38: tryCatchOne(expr, names, parentenv, handlers[[1L]])
39: doTryCatch(return(expr), name, parentenv, handler)
40: loadNamespace(package, ...)
41: runHook(".onLoad", env, package.lib, package)
42: tryCatch(fun(libname, pkgname), error = identity)
43: tryCatchList(expr, classes, parentenv, handlers)
44: tryCatchOne(expr, names, parentenv, handlers[[1L]])
45: doTryCatch(return(expr), name, parentenv, handler)
46: fun(libname, pkgname)
47: run_on_load()
48: callback()
49: is_installed("testthat")
50: Ops.numeric_version(installed_version, version)
51: as.numeric_version(e2)
52: numeric_version(x)
53: .make_numeric_version(x, strict, .standard_regexps()$valid_numeric_version)