1 #ifndef STAN_MATH_PRIM_MAT_FUN_QR_THIN_Q_HPP 2 #define STAN_MATH_PRIM_MAT_FUN_QR_THIN_Q_HPP 19 Eigen::Matrix<T, Eigen::Dynamic, Eigen::Dynamic>
qr_thin_Q(
20 const Eigen::Matrix<T, Eigen::Dynamic, Eigen::Dynamic>& m) {
21 typedef Eigen::Matrix<T, Eigen::Dynamic, Eigen::Dynamic> matrix_t;
23 Eigen::HouseholderQR<matrix_t> qr(m.rows(), m.cols());
25 const int min_size =
std::min(m.rows(), m.cols());
26 matrix_t Q = qr.householderQ() * matrix_t::Identity(m.rows(), min_size);
27 for (
int i = 0; i < min_size; i++)
28 if (qr.matrixQR().coeff(i, i) < 0)
void check_nonzero_size(const char *function, const char *name, const T_y &y)
Check if the specified matrix/vector is of non-zero size.
int min(const std::vector< int > &x)
Returns the minimum coefficient in the specified column vector.
Eigen::Matrix< T, Eigen::Dynamic, Eigen::Dynamic > qr_thin_Q(const Eigen::Matrix< T, Eigen::Dynamic, Eigen::Dynamic > &m)
Returns the orthogonal factor of the thin QR decomposition.