iskm/learnxinyminutes-docs
1
0
Fork 0
mirror of https://github.com/adambard/learnxinyminutes-docs.git synced 2024-12-23 09:41:36 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Bender Bending Rodríguez

Browse Source 
Let's make the function example do something a little more interesting.
This commit is contained in:
i 2013-08-09 18:13:08 -04:00
parent b86da2e208
commit f0d771ddea
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
r.html.markdown
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