当前位置: 首页>>代码示例 >>用法及示例精选 >>正文


R butcher axe-survreg.penal 取消监管处罚


survreg.penal 对象是从生存包。它们是从返回的survreg函数,代表拟合参数生存模型。

用法

# S3 method for survreg.penal
axe_call(x, verbose = FALSE, ...)

# S3 method for survreg.penal
axe_data(x, verbose = FALSE, ...)

# S3 method for survreg.penal
axe_env(x, verbose = FALSE, ...)

参数

x

一个模型对象。

verbose

每次执行 ax 方法时打印信息。记录释放了多少内存以及禁用了哪些函数。默认为 FALSE

...

与砍伐相关的任何其他参数。

删除了 survreg 对象。

例子

# Load libraries
library(parsnip)
library(survival)

# Create model and fit
survreg_fit <- surv_reg(mode = "regression", dist = "weibull") %>%
  set_engine("survival") %>%
  fit(Surv(time, status) ~ rx, data = rats)

out <- butcher(survreg_fit, verbose = TRUE)
#> ✔ Memory released: 19.66 kB

# Another survreg.penal object
wrapped_survreg.penal <- function() {
  some_junk_in_environment <- runif(1e6)
  fit <- survreg(Surv(time, status) ~ rx,
                 data = rats, subset = (sex == "f"))
  return(fit)
}

# Remove junk
cleaned_sp <- axe_env(wrapped_survreg.penal(), verbose = TRUE)
#> ✔ Memory released: 8.09 MB

# Check size
lobstr::obj_size(cleaned_sp)
#> 13.74 kB
源代码:R/survreg.penal.R

相关用法


注:本文由纯净天空筛选整理自Davis Vaughan等大神的英文原创作品 Axing an survreg.penal。非经特殊声明,原始代码版权归原作者所有,本译文未经允许或授权,请勿转载或复制。