1 #ifndef STAN_MATH_PRIM_MAT_FUN_DIAG_PRE_MULTIPLY_HPP
2 #define STAN_MATH_PRIM_MAT_FUN_DIAG_PRE_MULTIPLY_HPP
5 #include <boost/math/tools/promotion.hpp>
11 template <
typename T1,
typename T2,
int R1,
int C1,
int R2,
int C2>
12 Eigen::Matrix<typename boost::math::tools::promote_args<T1, T2>::type,
15 const Eigen::Matrix<T2, R2, C2>& m2) {
16 if (m1.cols() != 1 && m1.rows() != 1)
18 int m2_rows = m2.rows();
19 if (m1.size() != m2_rows)
21 int m2_cols = m2.cols();
22 Eigen::Matrix<typename boost::math::tools::promote_args<T1, T2>::type,
24 result(m2_rows, m2_cols);
25 for (
int j = 0; j < m2_cols; ++j)
26 for (
int i = 0; i < m2_rows; ++i)
27 result(i, j) = m1(i) * m2(i, j);
void domain_error(const char *function, const char *name, const T &y, const char *msg1, const char *msg2)
Throw a domain error with a consistently formatted message.
Eigen::Matrix< typename boost::math::tools::promote_args< T1, T2 >::type, R2, C2 > diag_pre_multiply(const Eigen::Matrix< T1, R1, C1 > &m1, const Eigen::Matrix< T2, R2, C2 > &m2)