WP Pricing

Comparación entre los distintos tipos de pricing.

pricing_long<-melt(pricing[c(2,3,4,6),])

Using Rango as id variables

names(pricing_long)<-c("rango","salto","precio")
steps<-as.integer(colnames(pricing)[2:25])
ggplot(pricing_long,aes(x=salto,y=precio))+
  geom_line(aes(group=rango,color=rango))+
    geom_point(data=client_info,aes(x=as.integer(findInterval(client_info$total_number_of_clients,steps)
),y=(avg_monthly_invoice*1000)),color='blue',alpha=0.3,size=0.5)+
    geom_smooth(method = 'lm',data=client_info,aes(x=as.integer(findInterval(client_info$total_number_of_clients,steps)
),y=(avg_monthly_invoice*1000)),color='blue',alpha=0.3,size=0.2)+
  geom_vline(xintercept = 24,color='red',size=1)+
  theme_bw()+
  theme(axis.text.x = element_text(angle = 45, hjust = 1))

Proyeccion de la facturación mensual de acuerdo al tipo de clientes actuales (en dolares)

De acuerdo al numero de usuarios que tienen cada usuario al dia de hoy, se calcula la facturacion mensual de acuerdo a cada una de las estrategias de pricing.