# NOT RUN {
data(GDPtax)
factors.df <- data.frame(Group = GDPtax$Group, Tax = GDPtax$Profittax)
# }
# NOT RUN {
res.tax_within_group <- frank.fglm(nsim = 999,
formula.full = Y~Group+Tax+Group:Tax,
formula.reduced = Y~Group+Tax,
curve_sets = list(Y=GDPtax$GDP),
factors = factors.df)
# }
# NOT RUN {
plot(res.tax_within_group)
# }
Run the code above in your browser using DataLab