Adding add_numbers.cpp for lecture 06

gvegayon · Sep 24, 2024 · 85731f1 · 85731f1
1 parent eff77c5
commit 85731f1
Showing 1 changed file with 27 additions and 0 deletions.
diff --git a/lecture-06/adds_numbers.cpp b/lecture-06/adds_numbers.cpp
@@ -0,0 +1,27 @@
+#include <Rcpp.h>
+
+using namespace Rcpp;
+
+// [[Rcpp::export]]
+NumericVector add_vectors(NumericVector a, NumericVector b) {
+
+  NumericVector c(a.size());
+
+  for(int i = 0; i < a.size(); i++) {
+    c[i] = a[i] + b[i];
+  }
+
+  return c;
+}
+
+// [[Rcpp::export]]
+NumericVector add_vectors2(NumericVector a, NumericVector b) {
+  return a + b;
+}
+
+/*** R
+add_vectors(1:5, 1:5)
+add_vectors2(1:5, 1:5)
+*/
+
+