Malarkey73

# vectorised function from Julia blog
function vectorised(x,y)
    r = exp(-abs(x-y))
    return r
end
 
# recommended devectorised function
function devectorised(x,y)
    r = similar(x)
    for i = 1:length(x)

Malarkey73

# vectorised function
vectorised <- function(x, y) 
  {
    r = exp(-abs(x-y))
    return(r)
  }
 
#devectorised function
devectorised <- function(x,y) 
{

Malarkey73

This is sort of a reply to this post: 

http://www.johnmyleswhite.com/notebook/2013/12/22/the-relationship-between-vectorized-and-devectorized-code/

which arises from a a discussion of this

http://julialang.org/blog/2013/09/fast-numeric/


So....