@@ -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)) {
 | 
			
		||||
      sd <- sd + (x[i] - mean(x)) ^ 2
 | 
			
		||||
    }
 | 
			
		||||
    sd <- sqrt(sd) / (length(x) - 1)
 | 
			
		||||
    sd <- sqrt(sd / (length(x) - 1))
 | 
			
		||||
    
 | 
			
		||||
    x <- runif(100)
 | 
			
		||||
    out <- vector("numeric", length(x))
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user