- TI nspire
[TI-nspire] Kron Reduction, Node Elimination 프로그램
Define LibPub kronreduction(smat,row)= Func : :If dim(smat)[1]<row Then : Goto end :EndIf : :Local tmat,i,j :newMat(dim(smat)[1],dim(smat)[2])→tmat : :For i,1,dim(smat)[1] : For j,1,dim(smat)[2] : smat[i,j]-((smat[i,row]*smat[row,j])/(smat[row,row]))→tmat[i,j] : EndFor :EndFor : :Return tmat :Lbl end :EndFunc
Kron Reduction 이라는 것을 알게되어, 개략적인 기능만을 구현하여 보았습니다.

간단한 함수입니다만, 행렬을 어떻게 처리하는게 좋을지 몰라서 추가작업은 하지 않도록 하겠습니다. Matrix 확장 라이브러리와 통합하는게 좋을 것 같은데... 의견이 있으시면 댓글 남겨주세요.
행렬에서 특정 행과 열을 삭제하는데 사용된
matrix\delete(mat,#row,#col) 함수는 matrix 확장 라이브러리에 구현되어 있습니다.
세상의모든계산기 님의 최근 댓글
감사합니다. 주말 잘 보내세요. 2026 03.06 [fx-570 ES] 과학 상수를 이용한 계산에서 에러 발생 상황 https://kin.naver.com/qna/detail.naver?d1id=11&dirId=1118&docId=492235162&page=1&answerNo=1 vs 2026 03.01 과학상수를 이용한 계산 중 자릿수 한계로 인한 에러 발생 가능성 https://allcalc.org:443/board_calculators/6925#comment_57029 2026 03.01 기본 어댑터 MODEL : AD0301-1202500GB INPUT : 100~240V, 50~60Hz, 0.8A Max OUTPUT : 12.0V, 2.5A, 30.0W ㄴ 측정시 플러그 외경/내경 : 5.5mm / 2mm 2026 02.15 엑셀 파일로 만드니 전체 160~200MB 정도 나옵니다. 읽고 / 저장하는데 한참 걸리네요. 컴 사양을 좀 탈 것 같습니다. -> 엑셀/한셀에서 읽히지만, 구글 스프레드시트에서는 열리지 않네요. 100만 개 단위로 끊어서 20MB 정도로 분할해 저장하는 편이 오히려 속 편할 것 같습니다. -> 이건 구글 스프레드시트에서도 열리긴 하네요. (약간 버퍼링?이 있습니다) 2026 02.10