Dado un precio mínimo y máximo (en un vector de longitud 2), genera un rango de precios tomando los intervalos regulares desde el mínimo hasta el máximo dividido en el número total de sesiones dadas.
Uso
prices_ranges(valor_hora, sesiones = c(4, 8, 12, 24, 36), k = 3)Argumentos
- valor_hora
Númerico de largo 2. Vector con los valores a interpolar.
- sesiones
Numérico. Vector con número de sesiones.
- k
Numérico. Número de valores decimales (por defecto 3).
Valor
data.frame con tres columnas: sesiones, indicando el número
de sesiones, valor_hora, indicando el valor de la sesión y valor_plan,
indicando el valor final del plan.
Ejemplos
list(
online_individual = prices_ranges(valor_hora = c(15, 10)),
presencial_individual = prices_ranges(valor_hora = c(20, 15)),
presencial_duo = prices_ranges(valor_hora = c(30, 20)),
presencial_trio = prices_ranges(valor_hora = c(40, 30)),
presencial_domicilio = prices_ranges(valor_hora = c(25, 17.5))
)
#> $online_individual
#> sesiones valor_hora valor_plan
#> 1 4 15.000 60.000
#> 2 8 13.750 110.000
#> 3 12 12.500 150.000
#> 4 24 11.250 270.000
#> 5 36 10.000 360.000
#>
#> $presencial_individual
#> sesiones valor_hora valor_plan
#> 1 4 20.000 80.000
#> 2 8 18.750 150.000
#> 3 12 17.500 210.000
#> 4 24 16.250 390.000
#> 5 36 15.000 540.000
#>
#> $presencial_duo
#> sesiones valor_hora valor_plan
#> 1 4 30.000 120.000
#> 2 8 27.500 220.000
#> 3 12 25.000 300.000
#> 4 24 22.500 540.000
#> 5 36 20.000 720.000
#>
#> $presencial_trio
#> sesiones valor_hora valor_plan
#> 1 4 40.000 160.000
#> 2 8 37.500 300.000
#> 3 12 35.000 420.000
#> 4 24 32.500 780.000
#> 5 36 30.000 1080.000
#>
#> $presencial_domicilio
#> sesiones valor_hora valor_plan
#> 1 4 25.000 100.000
#> 2 8 23.125 185.000
#> 3 12 21.250 255.000
#> 4 24 19.375 465.000
#> 5 36 17.500 630.000
#>