vecr2matr function

Transform single component indeces to double component indeces