KTUG마당은 KTUG를 방문하는 모든 이용자가 대화를 나누고 소식을 전하는 곳입니다.

  • 로그인 없이 자유롭게 글을 읽고 쓸 수 있는 철학은 처음과 같이 계속됩니다.
  • Team Blog의 글을 이곳 게시판의 "정보글"로 모았습니다. Team blog는 기고자가 올린 글에 질문을 받는 부담을 줄이기 위하여 댓글을 허용하지 않았습니다. 그러나 이곳 게시판으로 모으면서 댓글을 달 수 있습니다. 게시물을 작성하실 때 댓글을 원하지 않으시면 댓글을 허용하시지 않으시기를 바랍니다. 또한 불필요한 소모성 댓글을 달지 않도록 주의하여 주시기를 바랍니다.
  • TeX과 관련된 질문이나 답변은 QnA 마당을 이용하십시오. TeX과 관련된 질문은 지웁니다
  • MathJax를 이용한 수식조판을 사용하실 수 있습니다. 여기를 참조하세요.
  • 스팸 글을 막기 위하여 짧은 시간 내에 다시 글이 등록되는 IP를 막거나, 광고 글을 막기 위하여 금지어로 .com, .net 등을 설정하고 있습니다. 다소간의 불편함이 있으시더라도 양해 바랍니다.
    • 금지어에서 stackexchange, stackoverflow, ctan, overleaf, , github, google.com, gmail.com, .org, .io, sil.org, wiki.com, tistory.com등은 해제하였습니다.
  • 사용하는 편집기는 CKeditor입니다. 편집기에서 [enter]를 누르면 <p> 태그가 들어가고, 문단으로 생각하고 한줄을 비웁니다. 글줄만 바꾸려면 shift-enter 를 누르시면 <BR>가 들어가므로 용도에 맞게 나누어 쓸 수 있습니다.

정보글 문자열의 삽입정렬

2012.10.08 16:51

karnes 조회 수:5154 추천:1

문자열 정렬에 대해서는 DohyunKim 님의 http://www.ktug.or.kr/xe/index.php?document_srl=33728 이 있다.

다음 소스는 xfor 패키지에서 가져온 것으로 원래 숫자에 대해서만 삽입정렬하게 한 것인데 윗글의 \pdfstrcmp를 이용하여 문자열 정렬을 시도해보았다.

정렬 방식은 삽입정렬(insertion sort)


\documentclass{oblivoir}


\usepackage{xfor}


\makeatletter

\newcommand{\insertinto}[2]{%

\def\nlst{}% new list initially empty

\@for\n:=#2\do{%

% store new list in \toks@

\expandafter\toks@\expandafter{\nlst}%

% test current value against new value

%%%\ifnum\n>#1\relax %%%

\ifnum\pdfstrcmp{\n}{#1}=1\relax

% new value needs to be inserted before current value

\edef\newstuff{#1,\n}%

% end for loop at the end of this iteration

\@endfortrue

\else

\edef\newstuff{\n}%

\fi

% append new stuff to new list

\ifx\nlst\@empty

\edef\nlst{\newstuff}%

\else

\edef\nlst{\the\toks@,\newstuff}%

\fi

}%

% check to see if for loop was prematurely terminated

\if@endfor

% loop may have been terminated during final iteration, in

% which case \@forremainder is empty.

\ifx\@forremainder\@empty

% do nothing

\else

% loop prematurely ended, append remainder of original list

% to new list

\expandafter\toks@\expandafter{\nlst}%

\edef\nlst{\the\toks@,\@forremainder}%

\fi

\else

% wasn't prematurely terminated, so new value hasn't been added

% so add now.

\expandafter\toks@\expandafter{\nlst}%

\ifx\nlst\@empty

\edef\nlst{#1}%

\else

\edef\nlst{\the\toks@,#1}%

\fi

\fi

\global\let#2=\nlst

}


\newcommand*{\insertionsort}[1]{%

\def\sortedlist{}%

\@for\val:=#1\do{{\insertinto{\val}{\sortedlist}}}%

\let#1=\sortedlist

}


\makeatother


\begin{document}


\def\chlist{받,은,편,지,함,의,메,일,을,모,두,읽,으,셨,습,니,다}

\insertionsort{\chlist}

\chlist


\def\chlist{{독도는},{우리},{땅이다},{민족},{국가},{자유}}

\insertionsort{\chlist}

\chlist


\end{document}


결과:

outtag.PNG


번호 제목 글쓴이 날짜 조회 수
391 레이텍 사용 비율 [1] file yihoze 2016.05.27 5462
390 새 페이지에서 시작하는 차례 yihoze 2016.06.02 5262
389 여러 개 설치된 MacTeX 배포판 바꾸기 file Progress 2016.06.02 8041
388 TeX Live 2016 pretest 설치 안내 [11] 관리자 2016.06.05 150850
387 디지털 폰트 (alphanumeric 7/14 segment display) [7] file yihoze 2016.06.09 102788
386 세그먼트 명령 file yihoze 2016.06.15 5372
385 페이스북 그룹을 만드는 건 어떨까요? [11] file 김벤젠 2016.07.05 5393
384 혹시 이 사이트에 버그가 있는 것이 아닌지요. [2] 메타 2016.08.03 5285
383 GNU Emacs 24.5 버전의 메뉴얼 초벌번역 정리작업이 끝났습니다. [8] 불량양파 2016.08.04 5856
382 일단 하나의 소스로... 가로/세로 템플릿을 통해 바꿔서 출력하는것까지는 되었습니다. [2] 불량양파 2016.08.05 5528
381 무료폰트 고양체 발표 [1] 에드 2016.08.21 5724
380 흠.... 소 뒷걸음질 치듯이... 어찌어찌 하기는 했네요...-.-; [8] file 불량양파 2016.09.20 5801
379 작업하고 있는 시스템(?) 에서 템플릿 교체 동작까지 확인했습니다. [2] file 불량양파 2016.09.21 5763
378 테이블 변환도... 거의 완성단계라고 봐도 될거 같습니다. [7] file 불량양파 2016.09.29 5951
377 [참가신청] 문서작성워크숍 2016 [10] ischo 2016.10.11 7039
376 공주대 문서작성 워크숍에 많이 참석해주세요. [7] file Progress 2016.10.25 6869
375 근래에 본게 좀 있어서.. Layout 테스트를 좀 해봤는데.. [5] file 불량양파 2016.11.01 5853
374 실험적으로 해본겁니다만.. 괜찮네요 결과물이... file 불량양파 2016.11.03 5789
373 지금까지 작업한 부분을 정리해서 command 로 만들어 봤습니다. [6] 불량양파 2016.11.04 5818
372 논문등에서 사용되는 TeX 예제들을 모아서 작업한 분이 있으시네요.. 불량양파 2016.11.07 6089



XE Login