adstock.multiple: Adstocks a variable - infinite decay.

In Braja93/braja: General data manipulation functions

Description

User sets adstock rates, which transforms the input variable, outputting in a new table.

Usage

adstock.multiple(data, variable, adstock.rates)

Arguments

data	data.table that holds the variable to be transformed
variable	Character string of the variable to be transformed
adstock.rates	One (or many) rates to adstock the variable

Examples

x <- data.table::fread(system.file("extdata", "TVRs.csv", package = "nladwa"))

out1 <- adstock.multiple(data = x, variable = "TVRs", adstock.rates = 0.1)
out2 <- adstock.multiple(data = x, variable = "TVRs", adstock.rates = seq(from = 0.1, to = 0.9, by = 0.1))

out1[, Index := 1:nrow(out1)]
out2[, Index := 1:nrow(out2)]

plot.out1 <- data.table::melt(out1, id.vars = "Index")

ggplot2::ggplot(plot.out1, ggplot2::aes(x = Index, y = value, colour = variable)) +
  ggplot2::geom_line()

plot.out2 <- data.table::melt(out2, id.vars = "Index")

ggplot2::ggplot(plot.out2, ggplot2::aes(x = Index, y = value, colour = variable)) +
  ggplot2::geom_line()

Braja93/braja documentation built on May 6, 2019, 12:07 a.m.