Microsoft MVP성태의 닷넷 이야기
Math: 58. C# - 최소 자승법의 1차, 2차 수렴 그래프 변화 확인 [링크 복사], [링크+제목 복사]
조회: 1130
글쓴 사람
홈페이지
첨부 파일

C# - 최소 자승법의 1차, 2차 수렴 그래프 변화 확인

지난 글에서 최소 자승법(최소 제곱법)을 다뤘고,

C# - 해석학적 방법을 이용한 최소 자승법
; https://www.sysnet.pe.kr/2/0/11924

PLplot을 윈도우 화면으로 출력하는 방법도 배웠으니,

C# - PLplot 출력을 파일이 아닌 Window 화면으로 변경
; https://www.sysnet.pe.kr/2/0/11935

이제 ^^ 최소 자승법이 theta 값을 수정하면서 그래프가 점점 근사해가는 모습을 눈으로 확인할 수 있습니다. ^^

따라서 지난 2개의 글에 실린 예제 코드를 합치면,

private void GraphLSM()
{
    MLContext ctx = new MLContext();

    IDataView data = ctx.Data.LoadFromTextFile<ClickData>("click.csv", separatorChar: ',', hasHeader: true);

    // 표준화
    var xyList = ctx.Data.CreateEnumerable<ClickData>(data, false).NormalizeZscore();

    // 매개변수 초기화
    double theta0 = SystemRandomSource.Default.NextDouble();
    double theta1 = SystemRandomSource.Default.NextDouble();

    // 예측 함수
    Func<double, double> f = (x) => theta0 + theta1 * x;

    // 목적 함수
    Func<double, double, double> errorFunc = (x, y) => Math.Pow((y - f(x)), 2);
    Func<IEnumerable<ClickData>, double> E = (list) => 0.5 * list.ForEach((e) => errorFunc(e.X, e.Y)).Sum();

    // 학습률
    double ETA = 1e-03;

    // 오차의 차분
    double diff = 1.0;

    // 갱신 횟수
    int count = 0;

    // 오차의 차분이 0.01 이하가 될 때까지 매개변수 갱신을 반복
    double error = E(xyList);

    // 그래프를 그리기 위한 데이터 준비
    double[] xData = xyList.Select((elem) => elem.X).ToArray();
    double[] yData = xyList.Select((elem) => elem.Y).ToArray();

    double xMin = xData.Min();
    double xMax = xData.Max();
    double yMin = yData.Min();
    double yMax = yData.Max();
    double[] ptX = Utils.RangeInclusive(xMin, xMax, 0.01).ToArray();
    double[] ptY = ptY = new double[ptX.Length];

    string title = $"{count:#}th: t0 = {theta0:#.00}, t1 = {theta1:#.00}, diff = {diff:#.00}";
    this.DoubleBuffered = true;
    this.BackgroundImage = DrawPlotChart(xMin - 0.1, xMax + 0.1, yMin - 0.1, yMax + 0.1, title, DrawPlot);

    while (diff > 1e-02)
    {
        Thread.Sleep(100);
        // 갱신 결과를 임시 변수에 저장
        double tmp_theta0 = theta0 - ETA * xyList.ForEach((e) => f(e.X) - e.Y).Sum();
        double tmp_theta1 = theta1 - ETA * xyList.ForEach((e) => (f(e.X) - e.Y) * e.X).Sum();

        // 매개변수 갱신
        theta0 = tmp_theta0;
        theta1 = tmp_theta1;

        // 이전 회의 오차와의 차분을 계산
        double currentError = E(xyList);
        diff = error - currentError;
        error = currentError;

        count++;
        title = $"{count:#}th: t0 = {theta0:#.00}, t1 = {theta1:#.00}, diff = {diff:#.00}";
        this.BackgroundImage = DrawPlotChart(xMin - 0.1, xMax + 0.1, yMin - 0.1, yMax + 0.1, title, DrawPlot);
    }

    void DrawPlot(PLStream pl, string text)
    {
        pl.lab("x", "y", text);
        pl.col0(PLplot.Color.Blue);

        for (int i = 0; i < xData.Length; i++)
        {
            pl.poin(xData[i], yData[i], Symbol.Bullet);
        }

        pl.lsty(LineStyle.ShortDashesShortGaps);

        {
            for (int i = 0; i < ptX.Length; i++)
            {
                ptY[i] = f(ptX[i]);
            }

            pl.line(ptX, ptY);
        }
    }
}

실행 시 다음과 같은 애니메이션을 볼 수 있습니다.

lsm_plot_ing_1.gif

해본 김에, 2차 함수 그래프로 근사하는 장면도 볼 수 있고.

lsm_plot_ing_2.gif

(첨부 파일은 이 글의 예제 코드를 포함합니다.)




[이 글에 대해서 여러분들과 의견을 공유하고 싶습니다. 틀리거나 미흡한 부분 또는 의문 사항이 있으시면 언제든 댓글 남겨주십시오.]

[연관 글]





[최초 등록일: ]
[최종 수정일: 6/11/2019 ]

Creative Commons License
이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이센스에 따라 이용하실 수 있습니다.
by SeongTae Jeong, mailto:techsharer@outlook.com

비밀번호

댓글 쓴 사람
 




[1]  2  3  4  5  6  7  8  9  10  11  12  13  14  15  ...
NoWriterDateCnt.TitleFile(s)
12222정성태6/3/202021VS.NET IDE: 146. error information: "CryptQueryObject" (-2147024893/0x80070003)
12221정성태6/3/202041Windows: 168. 비어 있지 않은 디렉터리로 symbolic link(junction) 연결하는 방법
12220정성태6/3/202041.NET Framework: 907. C# DLL로부터 TLB 및 C/C++ 헤더 파일(TLH)을 생성하는 방법
12219정성태6/1/2020117.NET Framework: 906. C# - lock (this), lock (typeof(...))를 사용하면 안 되는 이유파일 다운로드1
12218정성태5/31/202076.NET Framework: 905. C# - DirectX 게임 클라이언트 실행 중 키보드 입력을 감지하는 방법
12217정성태5/24/202033오류 유형: 615. Transaction count after EXECUTE indicates a mismatching number of BEGIN and COMMIT statements. Previous count = 0, current count = 1.
12216정성태5/15/2020125.NET Framework: 904. USB/IP PROJECT를 이용해 C#으로 USB Keyboard 가상 장치 만들기
12215정성태5/12/2020144개발 환경 구성: 490. C# - (Wireshark의) USBPcap을 이용한 USB 패킷 모니터링파일 다운로드1
12214정성태5/5/2020117개발 환경 구성: 489. 정식 인증서가 있는 경우 Device Driver 서명하는 방법 (2) - UEFI/SecureBoot
12213정성태5/3/2020211개발 환경 구성: 488. (코드로 가상 USB 장치를 만들 수 있는) USB/IP PROJECT 소개
12212정성태5/1/2020105개발 환경 구성: 487. UEFI / Secure Boot 상태인지 확인하는 방법
12211정성태4/27/2020212개발 환경 구성: 486. WSL에서 Makefile로 공개된 리눅스 환경의 C/C++ 소스 코드 빌드
12210정성태4/20/2020313.NET Framework: 903. .NET Framework의 Strong-named 어셈블리 바인딩 (1) - app.config을 이용한 바인딩 리디렉션 [1]파일 다운로드1
12209정성태4/13/2020171오류 유형: 614. 리눅스 환경에서 C/C++ 프로그램이 Segmentation fault 에러가 발생한 경우 (2)
12208정성태4/12/2020209Linux: 29. 리눅스 환경에서 C/C++ 프로그램이 Segmentation fault 에러가 발생한 경우
12207정성태4/2/2020197스크립트: 19. Windows PowerShell의 NonInteractive 모드
12206정성태4/2/2020276오류 유형: 613. 파일 잠금이 바로 안 풀린다면? - The process cannot access the file '...' because it is being used by another process.
12205정성태4/2/2020178스크립트: 18. Powershell에서는 cmd.exe의 명령어를 지원하진 않습니다.
12204정성태4/1/2020170스크립트: 17. Powershell 명령어에 ';' (semi-colon) 문자가 포함된 경우
12203정성태3/18/2020364오류 유형: 612. warning: 'C:\ProgramData/Git/config' has a dubious owner: '...'.
12202정성태3/18/2020396개발 환경 구성: 486. .NET Framework 프로젝트를 위한 GitLab CI/CD Runner 구성
12201정성태3/18/2020198오류 유형: 611. git-credential-manager.exe: Using credentials for username "Personal Access Token".
12200정성태3/18/2020491VS.NET IDE: 145. NuGet + Github 라이브러리 디버깅 관련 옵션 3가지 - "Enable Just My Code" / "Enable Source Link support" / "Suppress JIT optimization on module load (Managed only)"
12199정성태3/17/2020191오류 유형: 610. C# - CodeDomProvider 사용 시 Unhandled Exception: System.IO.DirectoryNotFoundException: Could not find a part of the path '...\f2_6uod0.tmp'.
12198정성태3/17/2020202오류 유형: 609. SQL 서버 접속 시 "Cannot open user default database. Login failed."
[1]  2  3  4  5  6  7  8  9  10  11  12  13  14  15  ...