Displaying 2 results from an estimated 2 matches for "nam_val".
Did you mean:
name_val
2023 Jan 27
0
Resumen de R-help-es, Vol 167, Envío 10
...1 0
> 5 0 1 0 0
> 6 0 0 1 0
> 7 1 0 0 0
> 8 1 1 1 0
> 9 0 0 0 0
> 10 0 1 1 1
> > > #--- Función compara parejas de columnas comienzan por mismas 2 letras.
> > *colcompare <- function(df)* {
> +
> + nam_val <- names(df) %>% stri_sub(from = 1, to = 2) %>% unique()
> + res_df <- data.table()
> + for (i in 1:length(nam_val)) {
> + cols_tmp <- nam_val[i]
> + df_tmp <- df %>% select.(starts_with(cols_tmp)) %>%
> + rename.( a = 1) %>%
> +...
2023 Jan 28
0
Resumen de R-help-es, Vol 167, Envío 10
...1 0
> 5 0 1 0 0
> 6 0 0 1 0
> 7 1 0 0 0
> 8 1 1 1 0
> 9 0 0 0 0
> 10 0 1 1 1
> > > #--- Función compara parejas de columnas comienzan por mismas 2 letras.
> > *colcompare <- function(df)* {
> +
> + nam_val <- names(df) %>% stri_sub(from = 1, to = 2) %>% unique()
> + res_df <- data.table()
> + for (i in 1:length(nam_val)) {
> + cols_tmp <- nam_val[i]
> + df_tmp <- df %>% select.(starts_with(cols_tmp)) %>%
> + rename.( a = 1) %>%
> +...