From 8cdf15a8dcbc61c37b5916bde2000132eb5850f7 Mon Sep 17 00:00:00 2001 From: javantef <44594513+javantef@users.noreply.github.com> Date: Mon, 25 Feb 2019 01:52:22 -0500 Subject: [PATCH 1/4] Javante Foster's Code FizzBuzz --- fizzbuzz.Rmd | 18 ++++++++++ fizzbuzz.html | 97 ++++++++++++++++++--------------------------------- 2 files changed, 51 insertions(+), 64 deletions(-) diff --git a/fizzbuzz.Rmd b/fizzbuzz.Rmd index 58e4ceb..7e2090d 100644 --- a/fizzbuzz.Rmd +++ b/fizzbuzz.Rmd @@ -46,3 +46,21 @@ for(i in 1:100){ print(answer) ``` +### Javante Foster's Code + +```{r} +a<-c(1:100) + +z<-seq(3,100, by=3) +a[z]<-'FIZZ' + +y<-seq(5,100, by=5) +a[y]<-'BUZZ' + +x<-seq(15,100, by=15) +a[x]<-'FIZZBUZZ' + +a +``` + + diff --git a/fizzbuzz.html b/fizzbuzz.html index 7457e94..d8fa81d 100644 --- a/fizzbuzz.html +++ b/fizzbuzz.html @@ -97,9 +97,6 @@ button.code-folding-btn:focus { outline: none; } -summary { - display: list-item; -} @@ -107,71 +104,10 @@
- - - @@ -180,6 +116,7 @@ + +
+

Javante Foster’s Code

+
a<-c(1:100)
+
+z<-seq(3,100, by=3)
+a[z]<-'FIZZ'
+
+y<-seq(5,100, by=5)
+a[y]<-'BUZZ'
+
+x<-seq(15,100, by=15)
+a[x]<-'FIZZBUZZ'
+
+a
+
##   [1] "1"        "2"        "FIZZ"     "4"        "BUZZ"     "FIZZ"    
+##   [7] "7"        "8"        "FIZZ"     "BUZZ"     "11"       "FIZZ"    
+##  [13] "13"       "14"       "FIZZBUZZ" "16"       "17"       "FIZZ"    
+##  [19] "19"       "BUZZ"     "FIZZ"     "22"       "23"       "FIZZ"    
+##  [25] "BUZZ"     "26"       "FIZZ"     "28"       "29"       "FIZZBUZZ"
+##  [31] "31"       "32"       "FIZZ"     "34"       "BUZZ"     "FIZZ"    
+##  [37] "37"       "38"       "FIZZ"     "BUZZ"     "41"       "FIZZ"    
+##  [43] "43"       "44"       "FIZZBUZZ" "46"       "47"       "FIZZ"    
+##  [49] "49"       "BUZZ"     "FIZZ"     "52"       "53"       "FIZZ"    
+##  [55] "BUZZ"     "56"       "FIZZ"     "58"       "59"       "FIZZBUZZ"
+##  [61] "61"       "62"       "FIZZ"     "64"       "BUZZ"     "FIZZ"    
+##  [67] "67"       "68"       "FIZZ"     "BUZZ"     "71"       "FIZZ"    
+##  [73] "73"       "74"       "FIZZBUZZ" "76"       "77"       "FIZZ"    
+##  [79] "79"       "BUZZ"     "FIZZ"     "82"       "83"       "FIZZ"    
+##  [85] "BUZZ"     "86"       "FIZZ"     "88"       "89"       "FIZZBUZZ"
+##  [91] "91"       "92"       "FIZZ"     "94"       "BUZZ"     "FIZZ"    
+##  [97] "97"       "98"       "FIZZ"     "BUZZ"
+
From 01b40c1ae0df34a702a8c4f6e64a6f96df753f67 Mon Sep 17 00:00:00 2001 From: javantef <44594513+javantef@users.noreply.github.com> Date: Mon, 25 Feb 2019 02:09:40 -0500 Subject: [PATCH 2/4] Javante Foster Snakes&Ladders Snakes & Ladders --- snakesladders.Rmd | 15 +++++++++ snakesladders.html | 81 +++++++++------------------------------------- 2 files changed, 31 insertions(+), 65 deletions(-) diff --git a/snakesladders.Rmd b/snakesladders.Rmd index 045da5c..a1483ab 100644 --- a/snakesladders.Rmd +++ b/snakesladders.Rmd @@ -34,3 +34,18 @@ avg_moves <- mean(count) print(avg_moves) ``` +### Javante Foster's Code + +```{r} +m<-0 +n<-0 +z<-0 +for(i in 1:1000) +while(m<25){ + n<-n+1 + m<-m+sample(c(1:6),1) +} +z[i]<-n +mean(n) +``` + diff --git a/snakesladders.html b/snakesladders.html index b20f033..cf10dc0 100644 --- a/snakesladders.html +++ b/snakesladders.html @@ -97,9 +97,6 @@ button.code-folding-btn:focus { outline: none; } -summary { - display: list-item; -} @@ -107,71 +104,10 @@
- - - @@ -180,6 +116,7 @@ + +
+

Javante Foster’s Code

+
m<-0
+n<-0
+z<-0
+for(i in 1:1000)
+while(m<25){
+  n<-n+1
+  m<-m+sample(c(1:6),1)
+}
+z[i]<-n
+mean(n)
+
## [1] 9
From 35f64e25ebcc0185205882c7585064ae2b640e5a Mon Sep 17 00:00:00 2001 From: javantef <44594513+javantef@users.noreply.github.com> Date: Mon, 1 Apr 2019 15:41:22 -0400 Subject: [PATCH 3/4] Update --- snakesladders.Rmd | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) diff --git a/snakesladders.Rmd b/snakesladders.Rmd index a1483ab..f863f75 100644 --- a/snakesladders.Rmd +++ b/snakesladders.Rmd @@ -37,15 +37,18 @@ print(avg_moves) ### Javante Foster's Code ```{r} +p<-c() +for(i in 1:1000){ m<-0 n<-0 -z<-0 -for(i in 1:1000) while(m<25){ n<-n+1 - m<-m+sample(c(1:6),1) + m<-m + sample(c(1:6),1) } -z[i]<-n -mean(n) +p[i]<-c(n) +} +p + +mean(p) ``` From 67ffa3d71d6041e9d58d7cec465811f2caee5277 Mon Sep 17 00:00:00 2001 From: javantef Date: Mon, 15 Apr 2019 16:57:14 -0400 Subject: [PATCH 4/4] Update snakesladders.Rmd Update 04/15/19, Mon. --- snakesladders.Rmd | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/snakesladders.Rmd b/snakesladders.Rmd index f863f75..f3c22a6 100644 --- a/snakesladders.Rmd +++ b/snakesladders.Rmd @@ -38,17 +38,18 @@ print(avg_moves) ```{r} p<-c() + for(i in 1:1000){ m<-0 n<-0 while(m<25){ n<-n+1 - m<-m + sample(c(1:6),1) + m<-m + print(sample(c(1:6),1)) } p[i]<-c(n) } -p mean(p) + ```