21#ifndef Rcpp__vector__SubMatrix_h
22#define Rcpp__vector__SubMatrix_h
57template <
int RTYPE,
template <
class>
class StoragePolicy >
64 for(
int i=0; i<
nrows; i++, ++start){
70template <
int RTYPE,
template <
class>
class StoragePolicy >
73 if( nc != nrow() || nr != ncol() ){
79 for(
int j=0; j<nc; j++){
81 for(
int i=0; i<nrows; i++, ++start){
88#undef RCPP_WRAP_SUBMATRIX
89#define RCPP_WRAP_SUBMATRIX(RTYPE) \
90template<> inline SEXP wrap< SubMatrix<RTYPE> >( \
91 const SubMatrix<RTYPE>& object \
93 return Matrix<RTYPE>( object ) ; \
102#undef RCPP_WRAP_SUBMATRIX
#define RCPP_WRAP_SUBMATRIX(RTYPE)
Matrix & operator=(const Matrix &other)
VECTOR::iterator iterator
Vector< RTYPE >::iterator vec_iterator
Proxy operator()(int i, int j) const
vec_iterator column_iterator(int j) const
SubMatrix(MATRIX &m_, const Range &row_range_, const Range &col_range_)
traits::r_vector_iterator< RTYPE, StoragePolicy >::type iterator