# specify a grouping structure
groups = c(1,1,2,2,3)
# generate data
data = gen_toy_data(p=5, n=4, groups = groups, seed_id=3,signal_mean=20,group_sparsity=1)
# run SGS
model = fit_sgs(X = data$X, y = data$y, groups=groups, type = "linear",
path_length = 20, alpha = 0.95, vFDR = 0.1, gFDR = 0.1,
min_frac = 0.05, standardise="l2",intercept=TRUE,verbose=FALSE)
plot(model, how_many = 10)
Run the code above in your browser using DataLab