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; //平均數(shù)為3
//計(jì)算標(biāo)準(zhǔn)差
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));//標(biāo)準(zhǔn)差為2

為了使用函數(shù)式編程，我們預(yù)先定義一些幫助函數(shù)(helper functions):

//將類(lèi)數(shù)組對(duì)象轉(zhuǎn)換為真正的數(shù)組
function array(a,n){
 return Array.prototype.slice.call(a,n||0);
}
//將函數(shù)實(shí)參傳遞至左側(cè)
function partial_left(f){
 var args = arguments;
 return function(){
  var a = array(args,1);
  a = a.concat(array(arguments));
  return f.apply(this,a);
 };
}
//將函數(shù)的實(shí)參傳遞至右側(cè)
function partial_right(f){
 var args = arguments;
 return function(){
  var a = array(arguments);
  a = a.concat(array(args,1));
  return f.apply(this,a);
 };
}
//該函數(shù)實(shí)參被用做模版，
//實(shí)參列表中的undefined值會(huì)被實(shí)際實(shí)參值填充。
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);
 };
}
//返回一個(gè)函數(shù)類(lèi)似于f(g())
function compose(f,g){
 return function(){
  return f.call(this,g.apply(this,arguments));
 };
}

下面我們給出完全用函數(shù)式編程的js代碼：

var data = [1,1,3,5,5];
var sum = function(x,y){return x+y;};
var product = function(x,y){return x*y;};
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);
//好吧，高潮來(lái)鳥(niǎo) :)
var mean = product(reduce(data,sum),reciprocal(data.length));
var stddev = sqrt(product(reduce(map(data,compose(square,partial(sum,neg(mean)))),sum),reciprocal(sum(data.length,-1))));

除了reduce和map函數(shù)，其他函數(shù)前面都給出了。reduce函數(shù)類(lèi)似與ruby中的inject函數(shù)：

ary = (1..10).to_a
ary.inject(0) {|sum,i|sum + i} //結(jié)果為55

js的寫(xiě)法如下：

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

0為sum的初始值，如果省略則sum為數(shù)組第一個(gè)元素的值，這里可以省略。

map函數(shù)也很簡(jiǎn)單，類(lèi)似與對(duì)數(shù)組的每一個(gè)元素做操作，然后返回一個(gè)經(jīng)過(guò)操作后的數(shù)組，就以ruby代碼為例，js代碼與此類(lèi)似：

a = (1..3).to_a; #數(shù)組[1,2,3]
a.map {|x| x*2} #返回新數(shù)組[2,4,6]

下面我們來(lái)分析下那一長(zhǎng)串的代碼：）

sum和product定義了元素相加和相乘的函數(shù)；

neg也是一個(gè)函數(shù)功能等價(jià)于:product(-1,x),即對(duì)x值求負(fù)；

square函數(shù)等價(jià)于:Math.pow(x,2),即計(jì)算x的平方值，注意這里partial的第二個(gè)參數(shù)是undefined，這意味著這里的形參會(huì)被第一個(gè)實(shí)參填補(bǔ)；再說(shuō)的明白點(diǎn)：square(x)功能等于Math.pow(x,2)。

sqrt函數(shù)和square類(lèi)似，功能等價(jià)于:Math.pow(x,0.5)，相當(dāng)于計(jì)算x的開(kāi)二次方。
最后一個(gè)函數(shù)reciprocal也沒(méi)什么難度，等價(jià)于:Math.pow(x,-1)，即計(jì)算x的負(fù)一次方，相當(dāng)于計(jì)算x的倒數(shù)。

下面就是如何把上面各種函數(shù)揉捏在一起鳥(niǎo) ：）

先看平均值的計(jì)算，很簡(jiǎn)單：就是先計(jì)算數(shù)組元素的和然后乘上數(shù)組長(zhǎng)度的倒數(shù)，即數(shù)組和/數(shù)組長(zhǎng)度。

最后來(lái)看貌似很難的標(biāo)準(zhǔn)差，我們最好由內(nèi)向外看：
先看包含neg的那層：

//等價(jià)于函數(shù)sum(-1 * mean + x)
partial(sum,neg(mean)

下面看compose函數(shù)：

//下面在源代碼上做了等價(jià)替換，可以再次等價(jià)于：
//square(sum(-1*mean + x)),再次展開(kāi)(我剝,我剝,我剝洋蔥...):
//Math.pow(sum(-1*mean + x),2);
compose(square,sum(-1*mean + x))

接下來(lái)看map函數(shù):

//很清楚吧?。考磀ata中每一個(gè)元素都為一個(gè)x，將其傳入后面的函數(shù)，然后返回一個(gè)計(jì)算后的新數(shù)組，即新數(shù)組中的每個(gè)元素的值是data中的每個(gè)元素加上data負(fù)的平均數(shù)，然后對(duì)其結(jié)果計(jì)算2次方的結(jié)果。

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

再接著看map外面的reduce函數(shù)：

//將前面新數(shù)組的每個(gè)元素值加起來(lái)。
reduce(map(...),sum)

然后看一下reciprocal函數(shù)：

//等價(jià)于求(data.length-1)的倒數(shù)
reciprocal(sum(data.length,-1))

再看外層的product函數(shù):

//等價(jià)于新數(shù)組元素的和除以(data.length-1)
product(reduce(...),reciprocal(...))

最外層的sqrt表示對(duì)以上除法得出的結(jié)果求平方根；大家可以對(duì)照一下前面非函數(shù)編程的代碼，是一樣一樣滴 :) 看似蠻怕人的一大坨代碼，展開(kāi)分析后難度立馬將至零。如果各位看官最后表示還是未看明白，那完全是本貓語(yǔ)言表達(dá)能力的問(wèn)題，歡迎提問(wèn)。

解釋完畢，打完收功，大功告成。

希望本文所述對(duì)大家的javascript程序設(shè)計(jì)有所幫助。

您可能感興趣的文章: