Какой самый быстрый способ вычисления первых двух главных компонент в R?

Я использую princomp в R для выполнения PCA. Моя матрица данных огромна (10K x 10K с каждым значением до 4 десятичных точек). Это занимает ~3,5 часа и ~6,5 ГБ физической памяти на процессоре Xeon 2,27 ГГц.

Поскольку мне нужны только первые два компонента, есть ли более быстрый способ сделать это?

Обновление:

В дополнение к скорости, есть ли эффективный способ сделать это?

Для вычисления первых двух компонент с помощью svd(,2,) требуется ~2 часа и ~6.3 ГБ физической памяти.