Merge pull request #183 from isomorphisms/patch-4

Bender Bending Rodríguez
This commit is contained in:
Adam Bard 2013-08-11 12:05:55 -07:00
commit c6123b96d6

View File

@ -2,6 +2,7 @@
language: R language: R
contributors: contributors:
- ["e99n09", "http://github.com/e99n09"] - ["e99n09", "http://github.com/e99n09"]
- ["isomorphismes", "http://twitter.com/isomorphisms"]
filename: learnr.r filename: learnr.r
--- ---
@ -296,14 +297,13 @@ if (4 > 3) {
# FUNCTIONS # FUNCTIONS
# Defined like so: # Defined like so:
myFunc <- function(x) { jiggle <- function(x) {
x <- x * 4 x+ rnorm(x, sd=.1) #add in a bit of (controlled) noise
x <- x - 1
return(x) return(x)
} }
# Called like any other R function: # Called like any other R function:
myFunc(5) # 19 jiggle(5) # 5±ε. After set.seed(2716057), jiggle(5)==5.005043
######################### #########################
# Fun with data: vectors, matrices, data frames, and arrays # Fun with data: vectors, matrices, data frames, and arrays