course
/
r4ds
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Correct parens 

Fixes #144
This commit is contained in:
hadley 2016-07-24 09:07:48 -05:00
parent 62b6e171f3
commit 7bb8acf72a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
iteration.Rmd
View File

@ -137,7 +137,7 @@ That's all there is to the for loop! Now is a good time to practice creating som
for (i in seq_along(x)) { for (i in seq_along(x)) {
sd <- sd + (x[i] - mean(x)) ^ 2 sd <- sd + (x[i] - mean(x)) ^ 2
} }
sd <- sqrt(sd) / (length(x) - 1) sd <- sqrt(sd / (length(x) - 1))
x <- runif(100) x <- runif(100)
out <- vector("numeric", length(x)) out <- vector("numeric", length(x))