Самый быстрый способ отсортировать каждую строку большой матрицы в R

У меня большая матрица:

set.seed(1)
a <- matrix(runif(9e+07),ncol=300)

Я хочу отсортировать каждую строку в матрице:

> system.time(sorted <- t(apply(a,1,sort)))
   user  system elapsed 
  42.48    3.40   45.88 

У меня много оперативной памяти для работы, но мне нужен более быстрый способ выполнить эту операцию.