Update fitIndices.R

changed calculation of information matrix in sic() function