Extract object parameters

Returns the parameters used to build a model.

parameters(object, ...)

# S3 method for lm
parameters(object, ...)

# S3 method for bestfit
parameters(object, ...)

Arguments

object	A model object.
…	not used.

Value

the parameters, predictors and response names besides the original data used to build the model.

Examples

fit <- lm(log(valor) ~ ., centro_2015@data)
p <- parameters(fit)
p$parameters
#> [1] "valor"      "area_total" "quartos"    "suites"     "garagens"  
#> [6] "dist_b_mar" "padrao"    
p$predictors
#> [1] "area_total" "quartos"    "suites"     "garagens"   "dist_b_mar"
#> [6] "padrao"    
p$response
#> [1] "valor"
p$data
#> # A tibble: 53 x 7
#>      valor area_total quartos suites garagens dist_b_mar padrao
#>      <dbl>      <dbl>   <int>  <int>    <int>      <int> <fct> 
#>  1 1060000      350         3      1        2        720 medio 
#>  2  510000      137.        3      1        1        665 medio 
#>  3  780000      165.        3      1        2        415 medio 
#>  4  550000      175.        3      1        1        320 medio 
#>  5  850000      123.        3      1        3        895 alto  
#>  6  300000       89.8       2      0        1        645 baixo 
#>  7  750000      174         2      1        2        860 alto  
#>  8  650000      123         3      1        1        745 alto  
#>  9  620000      121         3      1        1        745 alto  
#> 10  740000      109         3      1        1        300 medio 
#> # ... with 43 more rows
best_fit <- bestfit(valor ~ ., centro_2015@data)
parameters(best_fit)
#> $parameters
#> [1] "valor"      "area_total" "quartos"    "suites"     "garagens"  
#> [6] "dist_b_mar" "padrao"    
#> 
#> $predictors
#> [1] "area_total" "quartos"    "suites"     "garagens"   "dist_b_mar"
#> [6] "padrao"    
#> 
#> $response
#> [1] "valor"
#> 
#> $data
#> # A tibble: 53 x 7
#>      valor area_total quartos suites garagens dist_b_mar padrao
#>      <dbl>      <dbl>   <int>  <int>    <int>      <int> <fct> 
#>  1 1060000      350         3      1        2        720 medio 
#>  2  510000      137.        3      1        1        665 medio 
#>  3  780000      165.        3      1        2        415 medio 
#>  4  550000      175.        3      1        1        320 medio 
#>  5  850000      123.        3      1        3        895 alto  
#>  6  300000       89.8       2      0        1        645 baixo 
#>  7  750000      174         2      1        2        860 alto  
#>  8  650000      123         3      1        1        745 alto  
#>  9  620000      121         3      1        1        745 alto  
#> 10  740000      109         3      1        1        300 medio 
#> # ... with 43 more rows
#> 
#> $call
#> bestfit.formula(formula = valor ~ ., data = centro_2015@data)
#>