sensibilidade_vv: Sensibilidade-Fluxo de Vendas

View source: R/involutivo.R

sensibilidade_vvR Documentation

Sensibilidade-Fluxo de Vendas

Description

Sensibilidade-Fluxo de Vendas

Usage

sensibilidade_vv(range, cc, wc, vgv, wv, bdi_i, bdi_c, cor, tma)

Examples

wv_otimista <- c(0, 0, rep(2, 10))/20
wv_pessimista <- c(0, 0, rep(1, 18))/20
range_vv <- list(Pessimista = wv_pessimista, Provavel = wv, Otimista = wv_otimista)
s_vv <- sensibilidade_vv(range_vv,
                         cc = cc, wc = wc,
                         vgv = vgv,
                         bdi_i = bdi_i, bdi_c = bdi_c,
                         cor = cor, tma = tma)
s_vv
ggplot(s_vv, aes(x = Situacao, y = vpl)) +
  geom_col() +
  scale_y_continuous(labels = scales::dollar) +
  labs(title = "Sensibilidade à variação da velocidade de vendas")

lfpdroubi/appraiseR documentation built on April 14, 2024, 10:27 p.m.