Rcpp Version 0.12.12
plus.h
Go to the documentation of this file.
1 // -*- mode: C++; c-indent-level: 4; c-basic-offset: 4; tab-width: 4 -*-
2 //
3 // plus.h: Rcpp R/C++ interface class library -- operator+
4 //
5 // Copyright (C) 2010 - 2011 Dirk Eddelbuettel and Romain Francois
6 //
7 // This file is part of Rcpp.
8 //
9 // Rcpp is free software: you can redistribute it and/or modify it
10 // under the terms of the GNU General Public License as published by
11 // the Free Software Foundation, either version 2 of the License, or
12 // (at your option) any later version.
13 //
14 // Rcpp is distributed in the hope that it will be useful, but
15 // WITHOUT ANY WARRANTY; without even the implied warranty of
16 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 // GNU General Public License for more details.
18 //
19 // You should have received a copy of the GNU General Public License
20 // along with Rcpp. If not, see <http://www.gnu.org/licenses/>.
21 
22 #ifndef Rcpp__sugar__plus_h
23 #define Rcpp__sugar__plus_h
24 
25 namespace Rcpp{
26 namespace sugar{
27 
28  template <int RTYPE, bool LHS_NA, typename LHS_T, bool RHS_NA, typename RHS_T >
29  class Plus_Vector_Vector : public Rcpp::VectorBase<RTYPE, true , Plus_Vector_Vector<RTYPE,LHS_NA,LHS_T,RHS_NA,RHS_T> > {
30  public:
34 
37 
38  Plus_Vector_Vector( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_ ) :
39  lhs(lhs_.get_ref()), rhs(rhs_.get_ref()) {}
40 
41  inline STORAGE operator[]( R_xlen_t i ) const {
42  STORAGE lhs_ = lhs[i] ;
43  if( traits::is_na<RTYPE>(lhs_) ) return lhs_ ;
44  STORAGE rhs_ = rhs[i] ;
45  return traits::is_na<RTYPE>(rhs_) ? rhs_ : (lhs_ + rhs_) ;
46  }
47 
48  inline R_xlen_t size() const { return lhs.size() ; }
49 
50  private:
51  const LHS_EXT& lhs ;
52  const RHS_EXT& rhs ;
53  } ;
54  // specialization of the above for REALSXP because :
55  // NA_REAL + NA_REAL = NA_REAL
56  // NA_REAL + x = NA_REAL
57  // x + NA_REAL = NA_REAL
58  template <bool LHS_NA, typename LHS_T, bool RHS_NA, typename RHS_T >
59  class Plus_Vector_Vector<REALSXP,LHS_NA,LHS_T,RHS_NA,RHS_T> :
60  public Rcpp::VectorBase<REALSXP, true , Plus_Vector_Vector<REALSXP,LHS_NA,LHS_T,RHS_NA,RHS_T> > {
61  public:
64 
67 
68  Plus_Vector_Vector( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_ ) :
69  lhs(lhs_.get_ref()), rhs(rhs_.get_ref()) {}
70 
71  inline double operator[]( R_xlen_t i ) const {
72  return lhs[i] + rhs[i] ;
73  }
74 
75  inline R_xlen_t size() const { return lhs.size() ; }
76 
77  private:
78  const LHS_EXT& lhs ;
79  const RHS_EXT& rhs ;
80  } ;
81 
82 
83 
84 
85  // specialization LHS_NA = false
86  template <int RTYPE, typename LHS_T, bool RHS_NA, typename RHS_T >
87  class Plus_Vector_Vector<RTYPE,false,LHS_T,RHS_NA,RHS_T> : public Rcpp::VectorBase<RTYPE,true, Plus_Vector_Vector<RTYPE,false,LHS_T,RHS_NA,RHS_T> > {
88  public:
92 
95 
96  Plus_Vector_Vector( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_ ) :
97  lhs(lhs_.get_ref()), rhs(rhs_.get_ref()){}
98 
99  inline STORAGE operator[]( R_xlen_t i ) const {
100  STORAGE rhs_ = rhs[i] ;
101  if( traits::is_na<RTYPE>(rhs_) ) return rhs_ ;
102  return lhs[i] + rhs_ ;
103  }
104 
105  inline R_xlen_t size() const { return lhs.size() ; }
106 
107  private:
108  const LHS_EXT& lhs ;
109  const RHS_EXT& rhs ;
110  } ;
111  // LHS_NA = false & RTYPE = REALSXP
112  template <typename LHS_T, bool RHS_NA, typename RHS_T >
113  class Plus_Vector_Vector<REALSXP,false,LHS_T,RHS_NA,RHS_T> :
114  public Rcpp::VectorBase<REALSXP,true, Plus_Vector_Vector<REALSXP,false,LHS_T,RHS_NA,RHS_T> > {
115  public:
118 
121 
122  Plus_Vector_Vector( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_ ) :
123  lhs(lhs_.get_ref()), rhs(rhs_.get_ref()){}
124 
125  inline double operator[]( R_xlen_t i ) const {
126  return lhs[i] + rhs[i] ;
127  }
128 
129  inline R_xlen_t size() const { return lhs.size() ; }
130 
131  private:
132  const LHS_EXT& lhs ;
133  const RHS_EXT& rhs ;
134  } ;
135 
136 
137 
138  // specialization for RHS_NA = false
139  template <int RTYPE, bool LHS_NA, typename LHS_T, typename RHS_T >
140  class Plus_Vector_Vector<RTYPE,LHS_NA,LHS_T,false,RHS_T> : public Rcpp::VectorBase<RTYPE, true , Plus_Vector_Vector<RTYPE,LHS_NA,LHS_T,false,RHS_T> > {
141  public:
145 
148 
149  Plus_Vector_Vector( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_ ) :
150  lhs(lhs_.get_ref()), rhs(rhs_.get_ref()){}
151 
152  inline STORAGE operator[]( R_xlen_t i ) const {
153  STORAGE lhs_ = lhs[i] ;
154  if( traits::is_na<RTYPE>(lhs_) ) return lhs_ ;
155  return lhs_ + rhs[i] ;
156  }
157 
158  inline R_xlen_t size() const { return lhs.size() ; }
159 
160  private:
161  const LHS_EXT& lhs ;
162  const RHS_EXT& rhs ;
163  } ;
164  // RHS_NA = false, RTYPE = REALSXP
165  template <bool LHS_NA, typename LHS_T, typename RHS_T >
166  class Plus_Vector_Vector<REALSXP,LHS_NA,LHS_T,false,RHS_T> :
167  public Rcpp::VectorBase<REALSXP, true , Plus_Vector_Vector<REALSXP,LHS_NA,LHS_T,false,RHS_T> > {
168  public:
171 
174 
175  Plus_Vector_Vector( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_ ) :
176  lhs(lhs_.get_ref()), rhs(rhs_.get_ref()){}
177 
178  inline double operator[]( R_xlen_t i ) const {
179  return lhs[i] + rhs[i] ;
180  }
181 
182  inline R_xlen_t size() const { return lhs.size() ; }
183 
184  private:
185  const LHS_EXT& lhs ;
186  const RHS_EXT& rhs ;
187  } ;
188 
189 
190 
191 
192  // specialization for RHS_NA = false and LHS_NA = false
193  template <int RTYPE, typename LHS_T, typename RHS_T >
194  class Plus_Vector_Vector<RTYPE,false,LHS_T,false,RHS_T> : public Rcpp::VectorBase<RTYPE, false , Plus_Vector_Vector<RTYPE,false,LHS_T,false,RHS_T> > {
195  public:
199 
202 
203  Plus_Vector_Vector( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_ ) :
204  lhs(lhs_.get_ref()), rhs(rhs_.get_ref()){}
205 
206  inline STORAGE operator[]( R_xlen_t i ) const {
207  return lhs[i] + rhs[i] ;
208  }
209 
210  inline R_xlen_t size() const { return lhs.size() ; }
211 
212  private:
213  const LHS_EXT& lhs ;
214  const RHS_EXT& rhs ;
215  } ;
216  // specialization for RHS_NA = false and LHS_NA = false, RTYPE = REALSXP
217  template <typename LHS_T, typename RHS_T >
218  class Plus_Vector_Vector<REALSXP,false,LHS_T,false,RHS_T> :
219  public Rcpp::VectorBase<REALSXP, false , Plus_Vector_Vector<REALSXP,false,LHS_T,false,RHS_T> > {
220  public:
223 
226 
227  Plus_Vector_Vector( const LHS_TYPE& lhs_, const RHS_TYPE& rhs_ ) :
228  lhs(lhs_.get_ref()), rhs(rhs_.get_ref()){}
229 
230  inline double operator[]( R_xlen_t i ) const {
231  return lhs[i] + rhs[i] ;
232  }
233 
234  inline R_xlen_t size() const { return lhs.size() ; }
235 
236  private:
237  const LHS_EXT& lhs ;
238  const RHS_EXT& rhs ;
239  } ;
240 
241 
242 
243 
244 
245 
246 
247  template <int RTYPE, bool NA, typename T>
249  public Rcpp::VectorBase<RTYPE,true, Plus_Vector_Primitive<RTYPE,NA,T> > {
250  public:
253 
255 
256  Plus_Vector_Primitive( const VEC_TYPE& lhs_, STORAGE rhs_ ) :
257  lhs(lhs_.get_ref()), rhs(rhs_), rhs_na( Rcpp::traits::is_na<RTYPE>(rhs_) )
258  {}
259 
260  inline STORAGE operator[]( R_xlen_t i ) const {
261  if( rhs_na ) return rhs ;
262  STORAGE x = lhs[i] ;
263  return Rcpp::traits::is_na<RTYPE>(x) ? x : (x + rhs) ;
264  }
265 
266  inline R_xlen_t size() const { return lhs.size() ; }
267 
268  private:
269  const EXT& lhs ;
270  STORAGE rhs ;
271  bool rhs_na ;
272 
273  } ;
274  // RTYPE = REALSXP
275  template <bool NA, typename T>
276  class Plus_Vector_Primitive<REALSXP,NA,T> :
277  public Rcpp::VectorBase<REALSXP,true, Plus_Vector_Primitive<REALSXP,NA,T> > {
278  public:
281 
282  Plus_Vector_Primitive( const VEC_TYPE& lhs_, double rhs_ ) :
283  lhs(lhs_.get_ref()), rhs(rhs_)
284  {}
285 
286  inline double operator[]( R_xlen_t i ) const {
287  return rhs + lhs[i] ;
288  }
289 
290  inline R_xlen_t size() const { return lhs.size() ; }
291 
292  private:
293  const EXT& lhs ;
294  double rhs ;
295  } ;
296 
297 
298 
299  template <int RTYPE, typename T>
300  class Plus_Vector_Primitive<RTYPE,false,T> : public Rcpp::VectorBase<RTYPE,false, Plus_Vector_Primitive<RTYPE,false,T> > {
301  public:
304 
306 
307  Plus_Vector_Primitive( const VEC_TYPE& lhs_, STORAGE rhs_ ) :
308  lhs(lhs_.get_ref()), rhs(rhs_), rhs_na( Rcpp::traits::is_na<RTYPE>(rhs_) ) {}
309 
310  inline STORAGE operator[]( R_xlen_t i ) const {
311  return rhs_na ? rhs : (rhs + lhs[i] ) ;
312  }
313 
314  inline R_xlen_t size() const { return lhs.size() ; }
315 
316  private:
317  const EXT& lhs ;
318  STORAGE rhs ;
319  bool rhs_na ;
320  } ;
321  // RTYPE = REALSXP
322  template <typename T>
323  class Plus_Vector_Primitive<REALSXP,false,T> :
324  public Rcpp::VectorBase<REALSXP,false, Plus_Vector_Primitive<REALSXP,false,T> > {
325  public:
327 
329 
330  Plus_Vector_Primitive( const VEC_TYPE& lhs_, double rhs_ ) :
331  lhs(lhs_.get_ref()), rhs(rhs_) {}
332 
333  inline double operator[]( R_xlen_t i ) const {
334  return rhs + lhs[i] ;
335  }
336 
337  inline R_xlen_t size() const { return lhs.size() ; }
338 
339  private:
340  const EXT& lhs ;
341  double rhs ;
342  } ;
343 
344 
345 
346 
347 
348 
349  // Vector * nona(primitive)
350  template <int RTYPE, bool NA, typename T>
351  class Plus_Vector_Primitive_nona : public Rcpp::VectorBase<RTYPE,true, Plus_Vector_Primitive_nona<RTYPE,NA,T> > {
352  public:
356 
357  Plus_Vector_Primitive_nona( const VEC_TYPE& lhs_, STORAGE rhs_ ) :
358  lhs(lhs_.get_ref()), rhs(rhs_)
359  {}
360 
361  inline STORAGE operator[]( R_xlen_t i ) const {
362  STORAGE x = lhs[i] ;
363  return Rcpp::traits::is_na<RTYPE>(x) ? x : (x + rhs) ;
364  }
365 
366  inline R_xlen_t size() const { return lhs.size() ; }
367 
368  private:
369  const EXT& lhs ;
370  STORAGE rhs ;
371 
372  } ;
373  template <bool NA, typename T>
374  class Plus_Vector_Primitive_nona<REALSXP,NA,T> :
375  public Rcpp::VectorBase<REALSXP,true, Plus_Vector_Primitive_nona<REALSXP,NA,T> > {
376  public:
379 
380  Plus_Vector_Primitive_nona( const VEC_TYPE& lhs_, double rhs_ ) :
381  lhs(lhs_.get_ref()), rhs(rhs_)
382  {}
383 
384  inline double operator[]( R_xlen_t i ) const {
385  return rhs + lhs[i] ;
386  }
387 
388  inline R_xlen_t size() const { return lhs.size() ; }
389 
390  private:
391  const EXT& lhs ;
392  double rhs ;
393 
394  } ;
395 
396 
397 
398  template <int RTYPE, typename T>
399  class Plus_Vector_Primitive_nona<RTYPE,false,T> : public Rcpp::VectorBase<RTYPE,false, Plus_Vector_Primitive_nona<RTYPE,false,T> > {
400  public:
403 
405 
406  Plus_Vector_Primitive_nona( const VEC_TYPE& lhs_, STORAGE rhs_ ) :
407  lhs(lhs_.get_ref()), rhs(rhs_) {}
408 
409  inline STORAGE operator[]( R_xlen_t i ) const {
410  return rhs + lhs[i] ;
411  }
412 
413  inline R_xlen_t size() const { return lhs.size() ; }
414 
415  private:
416  const EXT& lhs ;
417  STORAGE rhs ;
418 
419  } ;
420  // RTYPE = REALSXP
421  template <typename T>
422  class Plus_Vector_Primitive_nona<REALSXP,false,T> :
423  public Rcpp::VectorBase<REALSXP,false, Plus_Vector_Primitive_nona<REALSXP,false,T> > {
424  public:
427 
428  Plus_Vector_Primitive_nona( const VEC_TYPE& lhs_, double rhs_ ) :
429  lhs(lhs_.get_ref()), rhs(rhs_) {}
430 
431  inline double operator[]( R_xlen_t i ) const {
432  return rhs + lhs[i] ;
433  }
434 
435  inline R_xlen_t size() const { return lhs.size() ; }
436 
437  private:
438  const EXT& lhs ;
439  double rhs ;
440 
441  } ;
442 
443 }
444 
445 
446 template <int RTYPE,bool NA, typename T, typename U>
450  const U &rhs
451 ) {
453 }
454 
455 
456 template <int RTYPE,bool NA, typename T, typename U>
457 inline typename traits::enable_if<traits::is_convertible<typename traits::remove_const_and_reference<U>::type, typename traits::storage_type<RTYPE>::type>::value, typename sugar::Plus_Vector_Primitive< RTYPE , NA , T> >::type
459  const U &rhs,
461 ) {
463 }
464 
465 
466 
467 template <int RTYPE,bool NA, typename T, typename U>
468 inline typename traits::enable_if<traits::is_convertible<typename traits::remove_const_and_reference<U>::type, typename traits::storage_type<RTYPE>::type>::value, sugar::Plus_Vector_Primitive_nona<RTYPE,NA,T> >::type
471  const typename sugar::NonaPrimitive< U > &rhs
472 ) {
474 }
475 
476 template <int RTYPE,bool NA, typename T, typename U>
477 inline typename traits::enable_if<traits::is_convertible<typename traits::remove_const_and_reference<U>::type, typename traits::storage_type<RTYPE>::type>::value, sugar::Plus_Vector_Primitive_nona< RTYPE , NA , T> >::type
479  const typename sugar::NonaPrimitive< U > &rhs,
481 ) {
483 }
484 
485 
486 template <int RTYPE,bool LHS_NA, typename LHS_T, bool RHS_NA, typename RHS_T>
488  RTYPE ,
489  LHS_NA, LHS_T,
490  RHS_NA, RHS_T
491  >
495 ) {
497  RTYPE,
498  LHS_NA, LHS_T,
499  RHS_NA, RHS_T
500  >( lhs, rhs ) ;
501 }
502 
503 }
504 
505 #endif
Rcpp::traits::Extractor< REALSXP, LHS_NA, LHS_T >::type LHS_EXT
Definition: plus.h:172
Rcpp::traits::Extractor< RTYPE, RHS_NA, RHS_T >::type RHS_EXT
Definition: plus.h:94
Rcpp::VectorBase< REALSXP, false, LHS_T > LHS_TYPE
Definition: plus.h:221
Rcpp::traits::Extractor< RTYPE, false, LHS_T >::type LHS_EXT
Definition: plus.h:93
Plus_Vector_Vector(const LHS_TYPE &lhs_, const RHS_TYPE &rhs_)
Definition: plus.h:38
Rcpp::VectorBase< RTYPE, NA, T > VEC_TYPE
Definition: plus.h:353
Rcpp::VectorBase< REALSXP, RHS_NA, RHS_T > RHS_TYPE
Definition: plus.h:117
Rcpp::VectorBase< REALSXP, false, LHS_T > LHS_TYPE
Definition: plus.h:116
Plus_Vector_Primitive_nona(const VEC_TYPE &lhs_, double rhs_)
Definition: plus.h:380
Plus_Vector_Primitive_nona(const VEC_TYPE &lhs_, STORAGE rhs_)
Definition: plus.h:406
Plus_Vector_Vector< RTYPE, LHS_NA, LHS_T, RHS_NA, RHS_T > & get_ref()
Definition: VectorBase.h:37
Rcpp::VectorBase< RTYPE, false, LHS_T > LHS_TYPE
Definition: plus.h:90
Rcpp::traits::Extractor< RTYPE, LHS_NA, LHS_T >::type LHS_EXT
Definition: plus.h:35
Rcpp::traits::Extractor< REALSXP, LHS_NA, LHS_T >::type LHS_EXT
Definition: plus.h:65
Rcpp::traits::Extractor< REALSXP, RHS_NA, RHS_T >::type RHS_EXT
Definition: plus.h:66
Rcpp::VectorBase< RTYPE, RHS_NA, RHS_T > RHS_TYPE
Definition: plus.h:91
traits::storage_type< RTYPE >::type STORAGE
Definition: plus.h:402
Rcpp::VectorBase< RTYPE, NA, T > VEC_TYPE
Definition: plus.h:251
Plus_Vector_Vector(const LHS_TYPE &lhs_, const RHS_TYPE &rhs_)
Definition: plus.h:227
Plus_Vector_Vector(const LHS_TYPE &lhs_, const RHS_TYPE &rhs_)
Definition: plus.h:149
Rcpp::traits::Extractor< REALSXP, false, LHS_T >::type LHS_EXT
Definition: plus.h:119
Rcpp::VectorBase< RTYPE, false, RHS_T > RHS_TYPE
Definition: plus.h:144
Rcpp::VectorBase< REALSXP, false, RHS_T > RHS_TYPE
Definition: plus.h:222
traits::storage_type< RTYPE >::type STORAGE
Definition: plus.h:31
STORAGE operator[](R_xlen_t i) const
Definition: plus.h:260
Rcpp::VectorBase< RTYPE, false, T > VEC_TYPE
Definition: plus.h:302
R_xlen_t size() const
Definition: plus.h:266
Rcpp::VectorBase< REALSXP, false, T > VEC_TYPE
Definition: plus.h:326
Plus_Vector_Primitive_nona(const VEC_TYPE &lhs_, STORAGE rhs_)
Definition: plus.h:357
Rcpp::traits::Extractor< REALSXP, false, RHS_T >::type RHS_EXT
Definition: plus.h:225
Rcpp::VectorBase< RTYPE, LHS_NA, LHS_T > LHS_TYPE
Definition: plus.h:143
Rcpp::traits::Extractor< RTYPE, false, T >::type EXT
Definition: plus.h:305
const LHS_EXT & lhs
Definition: plus.h:51
Rcpp::traits::Extractor< RTYPE, RHS_NA, RHS_T >::type RHS_EXT
Definition: plus.h:36
Plus_Vector_Vector(const LHS_TYPE &lhs_, const RHS_TYPE &rhs_)
Definition: plus.h:203
Rcpp::VectorBase< REALSXP, LHS_NA, LHS_T > LHS_TYPE
Definition: plus.h:169
Rcpp::VectorBase< RTYPE, false, LHS_T > LHS_TYPE
Definition: plus.h:197
Rcpp::traits::Extractor< REALSXP, RHS_NA, RHS_T >::type RHS_EXT
Definition: plus.h:120
Plus_Vector_Vector(const LHS_TYPE &lhs_, const RHS_TYPE &rhs_)
Definition: plus.h:175
Rcpp::traits::Extractor< RTYPE, false, RHS_T >::type RHS_EXT
Definition: plus.h:201
Plus_Vector_Primitive(const VEC_TYPE &lhs_, double rhs_)
Definition: plus.h:330
Rcpp::VectorBase< REALSXP, false, T > VEC_TYPE
Definition: plus.h:425
Rcpp::traits::Extractor< REALSXP, false, RHS_T >::type RHS_EXT
Definition: plus.h:173
traits::storage_type< RTYPE >::type STORAGE
Definition: plus.h:252
Rcpp::traits::Extractor< RTYPE, false, RHS_T >::type RHS_EXT
Definition: plus.h:147
traits::storage_type< RTYPE >::type STORAGE
Definition: plus.h:303
Rcpp::VectorBase< REALSXP, RHS_NA, RHS_T > RHS_TYPE
Definition: plus.h:63
STORAGE operator[](R_xlen_t i) const
Definition: plus.h:41
Rcpp::traits::Extractor< REALSXP, false, LHS_T >::type LHS_EXT
Definition: plus.h:224
Rcpp::VectorBase< RTYPE, RHS_NA, RHS_T > RHS_TYPE
Definition: plus.h:33
Rcpp::traits::Extractor< REALSXP, NA, T >::type EXT
Definition: plus.h:378
Date operator+(const Date &date, int offset)
Definition: Date.h:158
Rcpp::traits::Extractor< REALSXP, false, T >::type EXT
Definition: plus.h:328
Plus_Vector_Primitive(const VEC_TYPE &lhs_, double rhs_)
Definition: plus.h:282
static Na_Proxy NA
Definition: Na_Proxy.h:52
Rcpp::traits::Extractor< REALSXP, NA, T >::type EXT
Definition: plus.h:280
Plus_Vector_Vector(const LHS_TYPE &lhs_, const RHS_TYPE &rhs_)
Definition: plus.h:96
Rcpp::traits::Extractor< RTYPE, NA, T >::type EXT
Definition: plus.h:355
const RHS_EXT & rhs
Definition: plus.h:52
Rcpp::VectorBase< RTYPE, false, RHS_T > RHS_TYPE
Definition: plus.h:198
sugar::IsNa< RTYPE, NA, T > is_na(const Rcpp::VectorBase< RTYPE, NA, T > &t)
Definition: is_na.h:87
Rcpp::traits::Extractor< RTYPE, NA, T >::type EXT
Definition: plus.h:254
Rcpp::VectorBase< RTYPE, LHS_NA, LHS_T > LHS_TYPE
Definition: plus.h:32
Plus_Vector_Vector(const LHS_TYPE &lhs_, const RHS_TYPE &rhs_)
Definition: plus.h:68
Plus_Vector_Primitive_nona(const VEC_TYPE &lhs_, double rhs_)
Definition: plus.h:428
Rcpp::VectorBase< REALSXP, LHS_NA, LHS_T > LHS_TYPE
Definition: plus.h:62
Rcpp API.
Definition: algo.h:28
Rcpp::VectorBase< REALSXP, NA, T > VEC_TYPE
Definition: plus.h:279
Rcpp::VectorBase< REALSXP, NA, T > VEC_TYPE
Definition: plus.h:377
Rcpp::VectorBase< REALSXP, false, RHS_T > RHS_TYPE
Definition: plus.h:170
Rcpp::traits::Extractor< RTYPE, false, LHS_T >::type LHS_EXT
Definition: plus.h:200
traits::storage_type< RTYPE >::type STORAGE
Definition: plus.h:354
Plus_Vector_Primitive(const VEC_TYPE &lhs_, STORAGE rhs_)
Definition: plus.h:256
Rcpp::VectorBase< RTYPE, false, T > VEC_TYPE
Definition: plus.h:401
Rcpp::traits::Extractor< RTYPE, LHS_NA, LHS_T >::type LHS_EXT
Definition: plus.h:146
R_xlen_t size() const
Definition: plus.h:48
Rcpp::traits::Extractor< RTYPE, false, T >::type EXT
Definition: plus.h:404
Plus_Vector_Primitive(const VEC_TYPE &lhs_, STORAGE rhs_)
Definition: plus.h:307
Rcpp::traits::Extractor< REALSXP, false, T >::type EXT
Definition: plus.h:426
STORAGE operator[](R_xlen_t i) const
Definition: plus.h:361
Plus_Vector_Vector(const LHS_TYPE &lhs_, const RHS_TYPE &rhs_)
Definition: plus.h:122