convierte_a_metros: Convierte a metros
In lilianlopez/pavement_management: Pavement Management

Usage Arguments Examples

View source: R/my_functions.R

1	convierte_a_metros(df)

df

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (df) 
{
    factor_pie <- 0.3048
    columnas_pies <- c("wheelbase", "spc1", "spc2", "spc3", "spc4", 
        "spc5", "spc6", "spc7", "spc8", "spc9")
    df$spc4 <- df$spc4 %>% as.numeric()
    df[columnas_pies] <- df[columnas_pies] * factor_pie
    return(df)
  }