(This article was first published on binfalse » R, and kindly contributed to R-bloggers)
Ok, R is very well-considered in certain respects, but there are also some things annoying me… This time it’s scoping…
Let’s have a look to the following code:
1
2 3 4 5 6 |
fun=function()
{ if (runif(1) > .5) x = 1 x } |
First it looks damn unspectacular. But wait, whats that:
1
2 3 4 5 |
> x=0
> fun() [1] 1 > fun() [1] 0 |
Taking a closer look to the function shows that the returned value is randomly chosen from local (runif(1) > .5
) or global scope (runif(1) <= .5
). So you can’t expect a result from this function. Nasty, especially while debugging external code, isn’t it? 🙂
1
2 |
> sum(sapply(1:10^6, function (null) fun()))/10^6
[1] 0.499681 |
So again my advise: Think about such specific features! This won’t happen in any sensible language…
To leave a comment for the author, please follow the link and comment on their blog: binfalse » R.
R-bloggers.com offers daily e-mail updates about R news and tutorials on topics such as: Data science, Big Data, R jobs, visualization (ggplot2, Boxplots, maps, animation), programming (RStudio, Sweave, LaTeX, SQL, Eclipse, git, hadoop, Web Scraping) statistics (regression, PCA, time series, trading) and more...