| 52 | typedef typename Rcpp::traits::storage_type<RESULT_R_TYPE>::type STORAGE ; |
| 53 | |
| 54 | Outer( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_, Function fun_ ) : |
| 55 | lhs(lhs_), rhs(rhs_), fun(fun_), nr(lhs_.size()), nc(rhs_.size()) {} |
| 56 | |
| 57 | inline STORAGE operator()( int i, int j ) const { |
| 58 | return converter_type::get( fun( lhs[i], rhs[j] ) ); |