sensibilidade_vv | R Documentation |
Sensibilidade-Fluxo de Vendas
sensibilidade_vv(range, cc, wc, vgv, wv, bdi_i, bdi_c, cor, tma)
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")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.