最小二乘法曲线拟合

除了梯度下降法去拟合曲线,最小二乘法也是另一个方法。和梯度下降不断迭代求出极值不同的是,最小二乘法是直接求导计算出参数。数学的问题还是参考数学相关的资料吧,同时可以@refer http://blog.csdn.net/jairuschan/article/details/7517773

下面直接上代码。

/*
 * 利用最小二乘法求拟合参数
 *
 * @auther menmei
 * @date 2017/03/27
 */

/*
 * Least Square Procedure
 * @fomula w = (x'x)-1x'y
 */

/*
 * 获取矩阵的转秩
 *
 * @param Array
 * @return Array
 *
 */
function getMatrixT($origin){
    $lines = count($origin);
    if($lines <= 0) return False;
    $rowsArr = $origin[0];
    if(!is_array($rowsArr)) return False;
    $rows  = count($origin[0]);

    $return = [];

    for($i = 0; $i < $lines; $i ++){
        for($j = 0; $j < $rows; $j ++){
            $return[$j][$i] = $origin[$i][$j];

        }
    }
    return $return;
}

/*
 * 矩阵相乘
 *
 * @param Array $a
 * @param Array $b
 *
 * @condition rows(A) = lines(B)
 * @return Array $return
 */
function matrixMulti($a, $b){
    $linesA = count($a);
    $rowsA  = count($a[0]);
    $linesB = count($b);
    $rowsB = count($b[0]);
    if($rowsA != $linesB) return False;
    //echo  $rows;
    //if($linesA == 0 || $rowsB == 0) return False;
    for($i = 0; $i < $linesA; $i++){
        for($j = 0; $j < $rowsB; $j ++){
            $num = 0;
            for($z = 0; $z < $rowsA; $z ++){
                $num += $a[$i][$z] * $b[$z][$j];
            }
            $return[$i][$j] = $num;
        }
    }
    return $return;
}
/*
 *求矩阵的模
 * @refer http://blog.csdn.net/shanshanpt/article/details/16820325
 */
function calculate_A( $src, $n )
{
    $result = 0.0;

    if( $n == 1 )
    {
        return $src[0][0];
    }

    for( $i = 0; $i < $n; ++$i )
    {
        for( $j = 0; $j < $n - 1; ++$j )
        {
            for( $k = 0; $k < $n - 1; ++$k )
            {
                $x = $j + 1;
                $y = $k >= $i ? $k + 1 : $k;

                $tmp[$j][$k] = $src[$x][$y];
            }
        }

        $t = calculate_A( $tmp, $n - 1 );

        if( $i % 2 == 0 )
        {
            $result += $src[0][$i] * $t;
        }
        else
        {
            $result -= $src[0][$i] * $t;
        }
    }

    return $result;
}

/*
 * 伴随矩阵
 * @refer http://blog.csdn.net/shanshanpt/article/details/16820325
 */

function getAdjoint( $origin )
{
    $n = count($origin);

    if( $n == 1 )
    {
        $dst[][] = 1;
        return;
                          
    }

    for( $i = 0; $i < $n; ++$i )
    {
        for( $j = 0; $j < $n; ++$j )
        {
            for( $k = 0; $k < $n - 1; ++$k )
            {
                for( $t = 0; $t < $n - 1; ++$t )
                {
                    $x = $k >= $i ? $k + 1 : $k ;
                    $y = $t >= $j ? $t + 1 : $t;

                    $tmp[$k][$t] = $origin[$x][$y];
                }
            }
            $ret[$j][$i]  =  calculate_A( $tmp, $n - 1 );

            if( ( $i + $j ) % 2 == 1 )
            {
                $ret[$j][$i] = -1*$ret[$j][$i];
            }
            $ret[$j][$i] = 1/260*$ret[$j][$i];
        }
    }

    return $ret;
}

/***************** EXAMPLE ******************/
$a = [[1, 2], [1, 6], [1, 9], [1, 13]];
$y = [[4],[8],[12],[21]];
$aT = getMatrixT($a);
$aTa = matrixMulti($aT, $a);
$t = getAdjoint($aTa);
$ret = matrixMulti($t, $aT);
$ret = matrixMulti($ret, $y);
var_dump($ret);
//$dataset = [[1,4],[2,5],[5,1],[4,2]];
//$dataret = [19,26, 19, 20];
//$expect  = [10, 10];
//$step  = 0.001;
//$times = 1000000;

求伴随矩阵和矩阵的模的两个函数 自己写的不太好,运行起来比代码里用的函数慢多了。。就不放出来了,这里用的是参考一篇文章的代码。原代码是C语言写的。谢谢[shanshanpt] http://blog.csdn.net/shanshanpt/article/details/16820325

还有一些相关的函数。

/*
 * 获得逆序数
 * @auther menmei
 * @date 2017/03/27
 */

function getInversionNumber($arr){
    $Total = count($arr);
    $inversionNum = 0;
    $exist = [];

    for($i = 0; $i < $Total; $i ++){
        if($arr[$i] >= 1){
            $tmp = range(0, $arr[$i] - 1);
            //在tmp中有 但exist没有的。
            $diff = array_diff($tmp, $exist);
            $inversionNum += count($diff);
        }
        $exist[] = $arr[$i];
    }
    return $inversionNum;
}

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 216,039评论 6 498
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 92,223评论 3 392
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 161,916评论 0 351
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 58,009评论 1 291
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 67,030评论 6 388
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 51,011评论 1 295
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 39,934评论 3 416
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 38,754评论 0 271
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 45,202评论 1 309
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 37,433评论 2 331
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 39,590评论 1 346
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 35,321评论 5 342
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 40,917评论 3 325
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 31,568评论 0 21
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 32,738评论 1 268
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 47,583评论 2 368
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 44,482评论 2 352

推荐阅读更多精彩内容