summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authori <isomorphisms@sdf.org>2013-08-09 18:13:08 -0400
committeri <isomorphisms@sdf.org>2013-08-09 18:13:08 -0400
commitf0d771ddea5537e98ef47462c5c8c41b0314f856 (patch)
tree559956880865d8ed969a7f5c2245f282ac7c73a8
parentb86da2e2082e7fd1438d48e12125aeaa6a187b92 (diff)
Bender Bending Rodríguez
Let's make the function example do something a little more interesting.
-rw-r--r--r.html.markdown8
1 files changed, 4 insertions, 4 deletions
diff --git a/r.html.markdown b/r.html.markdown
index dd94072b..e7921299 100644
--- a/r.html.markdown
+++ b/r.html.markdown
@@ -2,6 +2,7 @@
language: R
contributors:
- ["e99n09", "http://github.com/e99n09"]
+ - ["isomorphismes", "http://twitter.com/isomorphisms"]
filename: learnr.r
---
@@ -296,14 +297,13 @@ if (4 > 3) {
# FUNCTIONS
# Defined like so:
-myFunc <- function(x) {
- x <- x * 4
- x <- x - 1
+jiggle <- function(x) {
+ x+ rnorm(x, sd=.1) #add in a bit of (controlled) noise
return(x)
}
# 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