mirror of
https://github.com/agdamsbo/FreesearchR.git
synced 2026-06-21 05:19:07 +02:00
Deploying to gh-pages from @ agdamsbo/FreesearchR@54dd332cd8 🚀
This commit is contained in:
parent
4cf4bd0499
commit
6d545337de
328 changed files with 12930 additions and 1662 deletions
51
reference/set_column_label.md
Normal file
51
reference/set_column_label.md
Normal file
|
|
@ -0,0 +1,51 @@
|
|||
# (Re)label columns in data.frame
|
||||
|
||||
(Re)label columns in data.frame
|
||||
|
||||
## Usage
|
||||
|
||||
``` r
|
||||
set_column_label(data, label, overwrite = TRUE)
|
||||
```
|
||||
|
||||
## Arguments
|
||||
|
||||
- data:
|
||||
|
||||
data.frame to be labelled
|
||||
|
||||
- label:
|
||||
|
||||
named list or vector
|
||||
|
||||
## Value
|
||||
|
||||
data.frame
|
||||
|
||||
## Examples
|
||||
|
||||
``` r
|
||||
ls <- list("mpg" = "", "cyl" = "Cylinders", "disp" = "", "hp" = "", "drat" = "", "wt" = "", "qsec" = "", "vs" = "", "am" = "", "gear" = "", "carb" = "")
|
||||
ls2 <- c("mpg" = "", "cyl" = "Cylinders", "disp" = "", "hp" = "Horses", "drat" = "", "wt" = "", "qsec" = "", "vs" = "", "am" = "", "gear" = "", "carb" = "")
|
||||
ls3 <- c("mpg" = "", "cyl" = "", "disp" = "", "hp" = "Horses", "drat" = "", "wt" = "", "qsec" = "", "vs" = "", "am" = "", "gear" = "", "carb" = "")
|
||||
mtcars |>
|
||||
set_column_label(ls) |>
|
||||
set_column_label(ls2) |>
|
||||
set_column_label(ls3)
|
||||
#> # A tibble: 32 × 11
|
||||
#> mpg cyl disp hp drat wt qsec vs am gear carb
|
||||
#> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
|
||||
#> 1 21 6 160 110 3.9 2.62 16.5 0 1 4 4
|
||||
#> 2 21 6 160 110 3.9 2.88 17.0 0 1 4 4
|
||||
#> 3 22.8 4 108 93 3.85 2.32 18.6 1 1 4 1
|
||||
#> 4 21.4 6 258 110 3.08 3.22 19.4 1 0 3 1
|
||||
#> 5 18.7 8 360 175 3.15 3.44 17.0 0 0 3 2
|
||||
#> 6 18.1 6 225 105 2.76 3.46 20.2 1 0 3 1
|
||||
#> 7 14.3 8 360 245 3.21 3.57 15.8 0 0 3 4
|
||||
#> 8 24.4 4 147. 62 3.69 3.19 20 1 0 4 2
|
||||
#> 9 22.8 4 141. 95 3.92 3.15 22.9 1 0 4 2
|
||||
#> 10 19.2 6 168. 123 3.92 3.44 18.3 1 0 4 4
|
||||
#> # ℹ 22 more rows
|
||||
rlang::expr(FreesearchR::set_column_label(label = !!ls3)) |> expression_string()
|
||||
#> [1] "FreesearchR::set_column_label(label=c(mpg='',cyl='',disp='',hp='Horses',drat='',wt='',qsec='',vs='',am='',gear='',carb=''))"
|
||||
```
|
||||
Loading…
Add table
Add a link
Reference in a new issue