tests/demo.R

In xinzhou1023/lmdecomp: A package for various type of linear model decomposition.

setwd("c:\\Users\\XinZhou\\Documents\\GitHub\\lmdecomp\\data-raw") # set work directory
library(lmdecomp) # load package
data=fread("input_data.csv") # load data
var=fread("input_var.csv") # load variable coefficients
submodel=fread("input_submodel.csv")

result=decomp_log(
  input_data=data, # raw data 
  input_var=var, # variable coefficient table
  y="sales", # dependent variable name in input_data
  y_m=NULL, # for ninah index process
  date="week", # date variable name in input_data
  cs=c("cs1","cs2"), # variable names for cross section in input_data; support multiple dimensions
  sm_factor=0.9, # smoothing factor for base exponential smooting, the bigger the more weight on current status, 0 means no smooth 
  is.output=F, # if True, then output decomp and contribution results to work directiory
  is.index=F # for ninah index process
)

runApp(result$app) # activate output panel