求块-Toeplitz矩阵QR分解中R的一种快速算法