diff --git a/fizzbuzz.Rmd b/fizzbuzz.Rmd
index 58e4ceb..89a2d99 100644
--- a/fizzbuzz.Rmd
+++ b/fizzbuzz.Rmd
@@ -46,3 +46,25 @@ for(i in 1:100){
 print(answer)
 ```
 
+### Zoren's code
+
+```{r,eval=F}
+result <-1
+for (j in 2:100){
+  if(j %% 3 == 0){
+    if (j %% 5 == 0) {
+      result <-paste(result, "FizzBuzz", sep = ",") }
+        else {result <- paste(result,"Fizz", sep = ", ")
+    }
+  }
+  else if (j %% 5 == 0) {
+    result <- paste(result, "Buzz", sep = ", ")
+  }
+  else {
+    result <- paste(result, j, sep = ", ")
+  }
+}
+print(result)
+```
+
+
diff --git a/snakesladders.Rmd b/snakesladders.Rmd
index 045da5c..1748758 100644
--- a/snakesladders.Rmd
+++ b/snakesladders.Rmd
@@ -34,3 +34,5 @@ avg_moves <- mean(count)
 print(avg_moves)
 ```
 
+a### Zoren's code
+unfinished