question: returns the upper triangular factor , r. concode_field_sep DoubleMatrix2D QR concode_elem_sep long serialVersionUID concode_elem_sep int m concode_elem_sep int n concode_elem_sep DoubleMatrix1D Rdiag concode_field_sep DoubleMatrix2D getH concode_elem_sep DoubleMatrix2D solve concode_elem_sep String toString concode_elem_sep DoubleMatrix2D getQ concode_elem_sep boolean hasFullRank
target: DoubleMatrix2D function ( ) { DoubleMatrix2D loc0 = QR . like ( n , n ) ; for ( int loc1 = 0 ; loc1 < n ; loc1 ++ ) { for ( int loc2 = 0 ; loc2 < n ; loc2 ++ ) { if ( loc1 < loc2 ) loc0 . setQuick ( loc1 , loc2 , QR . getQuick ( loc1 , loc2 ) ) ; else if ( loc1 == loc2 ) loc0 . setQuick ( loc1 , loc2 , Rdiag . getQuick ( loc1 ) ) ; else loc0 . setQuick ( loc1 , loc2 , 0 ) ; } } return loc0 ; }