cor_init function

Compute correlation for initializing the active set