Method Diag_Maker

inst/include/Rcpp/sugar/matrix/diag.h:57–57

	typedef typename Rcpp::traits::storage_type<RTYPE>::type STORAGE ;

	Diag_Maker( const VEC_TYPE& object_ ) : object(object_), n(object_.size()) {}

	inline STORAGE operator()( int i, int j ) const {
		return (i==j) ? object[i] : 0 ;