cor_init.stram function

Shit-scale tram method for computing correlation