Center each measurement by subtracting the mean.

center_tomic(tomic, measurement_vars = "all")

Arguments

tomic

Either a tidy_omic or triple_omic object

measurement_vars

measurement variables to center

Value

A tomic object where one or more measurements have been centered on a feature-by-feature basis.

Examples

center_tomic(brauer_2008_tidy)
#> $data
#> # A tibble: 18,000 × 8
#>    name    BP         MF        systematic_name sample nutrient    DR expression
#>    <chr>   <chr>      <chr>     <chr>           <chr>  <chr>    <dbl>      <dbl>
#>  1 YOL029C biologica… molecula… YOL029C         G0.05  G         0.05   -0.149  
#>  2 YOL029C biologica… molecula… YOL029C         G0.1   G         0.1    -0.109  
#>  3 YOL029C biologica… molecula… YOL029C         G0.15  G         0.15    0.341  
#>  4 YOL029C biologica… molecula… YOL029C         G0.2   G         0.2     0.251  
#>  5 YOL029C biologica… molecula… YOL029C         G0.25  G         0.25    0.101  
#>  6 YOL029C biologica… molecula… YOL029C         G0.3   G         0.3     0.0311 
#>  7 YOL029C biologica… molecula… YOL029C         N0.05  N         0.05    0.331  
#>  8 YOL029C biologica… molecula… YOL029C         N0.1   N         0.1     0.221  
#>  9 YOL029C biologica… molecula… YOL029C         N0.15  N         0.15    0.111  
#> 10 YOL029C biologica… molecula… YOL029C         N0.2   N         0.2     0.00111
#> # … with 17,990 more rows
#> 
#> $design
#> $design$features
#> # A tibble: 4 × 2
#>   variable        type               
#>   <chr>           <chr>              
#> 1 name            feature_primary_key
#> 2 systematic_name character          
#> 3 BP              character          
#> 4 MF              character          
#> 
#> $design$samples
#> # A tibble: 3 × 2
#>   variable type              
#>   <chr>    <chr>             
#> 1 sample   sample_primary_key
#> 2 nutrient character         
#> 3 DR       numeric           
#> 
#> $design$measurements
#> # A tibble: 3 × 2
#>   variable   type               
#>   <chr>      <chr>              
#> 1 name       feature_primary_key
#> 2 sample     sample_primary_key 
#> 3 expression numeric            
#> 
#> $design$feature_pk
#> [1] "name"
#> 
#> $design$sample_pk
#> [1] "sample"
#> 
#> 
#> attr(,"class")
#> [1] "tidy_omic" "tomic"     "general"