Revisión | a82322329e8edde4acc6c035434211892525bd2e (tree) |
---|---|
Tiempo | 2024-01-12 19:18:13 |
Autor | Lorenzo Isella <lorenzo.isella@gmai...> |
Commiter | Lorenzo Isella |
I do not really need to use clean_data() to clean again the dataset.
@@ -1,5 +1,5 @@ | ||
1 | 1 | rm(list=ls()) |
2 | -## last saved on Time-stamp: "2023-10-13 11:44:46 lorenzo" | |
2 | +## last saved on Time-stamp: "2024-01-12 10:43:01 lorenzo" | |
3 | 3 | |
4 | 4 | |
5 | 5 | library(tidyverse) |
@@ -10,9 +10,10 @@ | ||
10 | 10 | |
11 | 11 | source("/home/lorenzo/myprojects-hg/R-codes/stat_lib.R") |
12 | 12 | |
13 | -df<- read.xlsx("../input/scb_data_for_figures_final.xlsx") |> | |
14 | - as_tibble() |> | |
15 | - clean_data() | |
13 | +df<- read.xlsx("../input/scb_data_for_figures_2-22_top.xlsx") |> | |
14 | + as_tibble() |> | |
15 | + clean_names() | |
16 | + ## clean_data() | |
16 | 17 | |
17 | 18 | saveRDS(df, "scoreboard.RDS") |
18 | 19 |