javascript函数式编程实例分析

var data = [1,1,3,5,5];
var total = 0;
for(var i = 0;i < data.length;i++)
  total += data[i];
var mean = tatal/data.length; //平均数为3
//计算标准差
total = 0;
for(var i = 0;i < data.length;i++){
  var deviation = data[i] - mean;
  tatal += deviation  deviation;
  }
var stddev = Math,.sqrt(total/(data.length-1));//标准差为2

//将类数组对象转换为真正的数组
function array(a,n){
 return Array.prototype.slice.call(a,n||0);
}
//将函数实参传递至左侧
function partial_left(f){
 var args = arguments;
 return function(){
  var a = array(args,1);
  a = a.concat(array(arguments));
  return f.apply(this,a);
 };
}
//将函数的实参传递至右侧
function partial_right(f){
 var args = arguments;
 return function(){
  var a = array(arguments);
  a = a.concat(array(args,1));
  return f.apply(this,a);
 };
}
//该函数实参被用做模版，
//实参列表中的undefined值会被实际实参值填充。
function partial(f){
 var args = arguments;
 return function(){
  var a = array(args,1);
  var i = 0,j = 0;
  for(;i<a.length;i++)
   if(a[i] === undefined)
    a[i] = arguments[j++];
  a = a.concat(array(arguments,j));
  return f.apply(this,a);
 };
}
//返回一个函数类似于f(g())
function pose(f,g){
 return function(){
  return f.call(this,g.apply(this,arguments));
 };
}

var data = [1,1,3,5,5];
var sum = function(x,y){return x+y;};
var product = function(x,y){return xy;};
var neg = partial(product,-1);
var square = partial(Math.pow,undefined,2);
var sqrt = partial(Math.pow,undefined,0.5);
var reciprocal = partial(Math.pow,undefined,-1);
//好吧，高潮来鸟 :)
var mean = product(reduce(data,sum),reciprocal(data.length));
var stddev = sqrt(product(reduce(map(data,pose(square,partial(sum,neg(mean)))),sum),reciprocal(sum(data.length,-1))));

ary = (1..10).to_a
ary.inject(0) {|sum,i|sum + i} //结果为55

var ary = [1,2,3,4,5,6,7,8,9,10]
ary.reduce(function(sum,i){
 return sum + i;
},0);

a = (1..3).to_a; #数组[1,2,3]
a.map {|x| x2} #返回新数组[2,4,6]

//等价于函数sum(-1  mean + x)
partial(sum,neg(mean)

//狼蚁网站SEO优化在源代码上做了等价替换，可以等价于
//square(sum(-1mean + x)),展开(我剥,我剥,我剥洋葱...):
//Math.pow(sum(-1mean + x),2);
pose(square,sum(-1mean + x))

map(data,Math.pow(sum(-1mean + x),2))

//将前面新数组的每个元素值加起来。
reduce(map(...),sum)

//等价于求(data.length-1)的倒数
reciprocal(sum(data.length,-1))

//等价于新数组元素的和除以(data.length-1)
product(reduce(...),reciprocal(...))