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

(시리즈 글이 7개 있습니다.)
Math: 15. 그래프 그리기로 알아보는 뉴턴-랩슨(Newton-Raphson's method)법과 제곱근 구하기 - C#
; https://www.sysnet.pe.kr/2/0/10911

Math: 53. C# - 행렬식을 이용한 최소 자승법(LSM: Least Square Method)
; https://www.sysnet.pe.kr/2/0/11918

Math: 54. C# - 최소 자승법의 1차 함수에 대한 매개변수를 단순 for 문으로 구하는 방법
; https://www.sysnet.pe.kr/2/0/11919

Math: 55. C# - 다항식을 위한 최소 자승법(Least Squares Method)
; https://www.sysnet.pe.kr/2/0/11921

Math: 56. C# - 그래프 그리기로 알아보는 경사 하강법의 최소/최댓값 구하기
; https://www.sysnet.pe.kr/2/0/11923

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

Math: 58. C# - 최소 자승법의 1차, 2차 수렴 그래프 변화 확인
; https://www.sysnet.pe.kr/2/0/11936




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 at outlook.com

비밀번호

댓글 작성자
 



2021-08-10 04시11분
[221] PLplot 설치 하는 방법도 있으면 좋겠습니다.
[guest]
2021-08-10 04시57분
그냥 다음의 명령어로 nuget에서 설치하시면 됩니다.

Install-Package PLplot

아래의 글을 참고하세요.

C# - PLplot 사용 예제
; https://www.sysnet.pe.kr/2/0/11909
정성태

... 121  122  123  124  125  126  127  128  129  130  131  132  [133]  134  135  ...
NoWriterDateCnt.TitleFile(s)
1764정성태9/30/201423763오류 유형: 243. 파일 삭제가 안 되는 경우 - The action can't be comleted because the file is open in System
1763정성태9/30/201425286.NET Framework: 468. PDB 파일을 연동해 소스 코드 라인 정보를 알아내는 방법파일 다운로드1
1762정성태9/30/201426182.NET Framework: 467. 닷넷에서 EIP/RIP 레지스터 값을 구하는 방법 [1]파일 다운로드1
1761정성태9/29/201423286.NET Framework: 466. 윈도우 운영체제의 보안 그룹 이름 및 설명 문자열을 바꾸는 방법파일 다운로드1
1760정성태9/28/201421262.NET Framework: 465. ICorProfilerInfo::GetILToNativeMapping 메서드가 0x80131358을 반환하는 경우
1759정성태9/27/201432583개발 환경 구성: 240. Visual C++ / x64 환경에서 inline-assembly를 매크로 어셈블리로 대체하는 방법파일 다운로드1
1758정성태9/23/201439163개발 환경 구성: 239. 원격 데스크톱 접속(RDP)을 기존의 콘솔 모드처럼 사용하는 방법 [1]
1757정성태9/23/201419791오류 유형: 242. Lync로 모임 참여 시 소리만 들리지 않는 경우 - 두 번째 이야기
1756정성태9/23/201428909기타: 48. NVidia 제품의 과다한 디스크 사용 [2]
1755정성태9/22/201435737오류 유형: 241. Unity Web Player를 설치해도 여전히 설치하라는 화면이 나오는 경우 [4]
1754정성태9/22/201426105VC++: 80. 내 컴퓨터에서 C++ AMP 코드가 실행이 될까요? [1]
1753정성태9/22/201421876오류 유형: 240. Lync로 세미나 참여 시 소리만 들리지 않는 경우 [1]
1752정성태9/21/201441990Windows: 100. 윈도우 8 - RDP 연결을 이용해 VNC처럼 사용자 로그온 화면을 공유하는 방법 [5]
1751정성태9/20/201440089.NET Framework: 464. 프로세스 간 통신 시 소켓 필요 없이 간단하게 Pipe를 열어 통신하는 방법 [1]파일 다운로드1
1750정성태9/20/201425352.NET Framework: 463. PInvoke 호출을 이용한 비동기 파일 작업파일 다운로드1
1749정성태9/20/201425094.NET Framework: 462. 커널 객체를 위한 null DACL 생성 방법파일 다운로드1
1748정성태9/19/201426633개발 환경 구성: 238. [Synergy] 여러 컴퓨터에서 키보드, 마우스 공유
1747정성태9/19/201429971오류 유형: 239. psexec 실행 오류 - The system cannot find the file specified.
1746정성태9/18/201426889.NET Framework: 461. .NET EXE 파일을 닷넷 프레임워크 버전에 상관없이 실행할 수 있을까요? - 두 번째 이야기 [6]파일 다운로드1
1745정성태9/17/201424415개발 환경 구성: 237. 리눅스 Integration Services 버전 업그레이드 하는 방법 [1]
1744정성태9/17/201432313.NET Framework: 460. GetTickCount / GetTickCount64와 0x7FFE0000 주솟값 [4]파일 다운로드1
1743정성태9/16/201422089오류 유형: 238. 설치 오류 - Failed to get size of pseudo bundle
1742정성태8/27/201428455개발 환경 구성: 236. Hyper-V에 설치한 리눅스 VM의 VHD 크기 늘리는 방법 [2]
1741정성태8/26/201422559.NET Framework: 459. GetModuleHandleEx로 알아보는 .NET 메서드의 DLL 모듈 관계파일 다운로드1
1740정성태8/25/201433963.NET Framework: 458. 닷넷 GC가 순환 참조를 해제할 수 있을까요? [2]파일 다운로드1
1739정성태8/24/201427810.NET Framework: 457. 교착상태(Dead-lock) 해결 방법 - Lock Leveling [2]파일 다운로드1
... 121  122  123  124  125  126  127  128  129  130  131  132  [133]  134  135  ...