Minor code styling changes

Author: lcolladotor

_freeze/posts/16-functions/index/execute-results/html.json

@@ -269,7 +269,10 @@ This may be confusing at first, but it's really handy when doing interactive wor
 So, in the following call to `rnorm()`
 
 ```{r}
+## structure of the object
 str(rnorm)
+## or arguments of the function
+args(rnorm)
 mydata <- rnorm(100, 2, 1) ## Generate some data
 ```
 

_freeze/posts/17-loop-functions/index/execute-results/html.json

@@ -107,13 +107,16 @@ That is, we don't write a `for` loop that takes each element of `x` and each ele
 ```{r}
 ## Check that x and y have the same length
 stopifnot(length(x) == length(y))
+
 ## Create our result object
 result <- vector(mode = "integer", length = length(x))
+
 ## Loop through each element of x and y, calculate the sum,
 ## then store it on 'result'
 for (i in seq_along(x)) {
     result[i] <- x[i] + y[i]
 }
+
 ## Check that we got the same answer
 identical(result, x + y)
 ```