implemented complet.R
implemented corr.R
merge