Skip to content

Convert Table Entries to Numeric

cast_numeric.Rd

Selectively convert an R object to a numeric vector if doing so does not result in a warning. This is typically the case when a character string contains a symbol that cannot be coerced cleanly. The following rules apply during conversion:

  • characters converted if no warnings are triggered

  • integers are never converted

  • logical vectors always converted to 0 or 1

  • factors are optionally converted to numeric

Usage

cast_numeric(x, ...)

# S3 method for class 'character'
cast_numeric(x, ...)

# S3 method for class 'factor'
cast_numeric(x, ..., coerce_factor = TRUE)

# S3 method for class 'integer'
cast_numeric(x, ...)

# S3 method for class 'logical'
cast_numeric(x, ...)

# S3 method for class 'list'
cast_numeric(x, ..., coerce_factor = TRUE)

# S3 method for class 'data.frame'
cast_numeric(x, ..., coerce_factor = TRUE)

Arguments

x

An object for S3 dispatch. Usually a character, data frame, tibble, or named list containing convertible columns.

...

Additional arguments to allow extensibility to S3 methods.

coerce_factor

logical(1). Should factor types be converted to their corresponding numeric?

Value

An object coerced to a numeric if the rules above can be followed. A data frame, tibble, or list returns the same class object with the function applied to each element (column).

See also

as.numeric()

Author

Stu Field

Examples

tbl <- tibble::tibble(
  id     = 1:20,                            # NO
  chr_id = as.character(1:20),              # YES
  logic  = sample(c(TRUE, FALSE), 20, replace = TRUE), # YES
  fact   = factor(letters[1:20]),           # YES or NO depending on coerce.factor
  num    = rnorm(20),                       # YES
  x      = rep(c("foo", "bar"), each = 10), # NO
  y      = c(as.character(runif(19)), NA),  # YES; only 1 NA, 5% total
  z      = as.character(rnorm(20))          # YES
)
cast_numeric(tbl)
#> # A tibble: 20 × 8
#>       id chr_id logic  fact     num x           y         z
#>  * <int>  <dbl> <dbl> <dbl>   <dbl> <chr>   <dbl>     <dbl>
#>  1     1      1     1     1 -0.554  foo    0.825  -0.293   
#>  2     2      2     1     2  0.629  foo    0.274   0.255   
#>  3     3      3     0     3  2.07   foo    0.570  -0.553   
#>  4     4      4     1     4 -1.63   foo    0.336   1.41    
#>  5     5      5     1     5  0.512  foo    0.596  -0.795   
#>  6     6      6     0     6 -1.86   foo    0.192  -1.57    
#>  7     7      7     1     7 -0.522  foo    0.948  -1.04    
#>  8     8      8     1     8 -0.0526 foo    0.542   1.02    
#>  9     9      9     1     9  0.543  foo    0.545  -0.702   
#> 10    10     10     0    10 -0.914  foo    0.279   0.973   
#> 11    11     11     0    11  0.468  bar    0.447  -0.0768  
#> 12    12     12     1    12  0.363  bar    0.372   0.893   
#> 13    13     13     1    13 -1.30   bar    0.0281 -0.778   
#> 14    14     14     1    14  0.738  bar    0.466   0.437   
#> 15    15     15     1    15  1.89   bar    0.390   0.413   
#> 16    16     16     0    16 -0.0974 bar    0.0201  0.976   
#> 17    17     17     1    17 -0.936  bar    0.377   1.15    
#> 18    18     18     1    18 -0.0160 bar    0.560   1.22    
#> 19    19     19     0    19 -0.827  bar    0.857   0.000480
#> 20    20     20     0    20 -1.51   bar   NA       0.755