Update calculate_MSSI.R

Problem with column in disp dataframe. Column 7 is diff_y and we want column 8 which is disp.
Corrected line 85 where it was indeed disp and not diff_y