added subsample.R
added verif_fn.R
added visualization.R