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 조회 수:5153 추천: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


번호 제목 글쓴이 날짜 조회 수
491 kotex-euc 없이 새물리 np2를 lualatex으로 컴파일 file karnes 2014.03.14 6196
490 Scientific Workplace(SWP)에서 한글 사용하기 [3] 두부장수 2014.03.11 20738
489 sharelatex 오픈소스화 [2] 두텁 2014.02.24 11865
488 한국텍학회 정기총회 참석 후기 [7] file 에드 2014.02.19 8356
487 문화관광부와 한국저작권 위원회에서 배포하는 "폰트 파일에 대한 저작권 바로 알기" [1] likesam 2014.02.06 11834
486 한국텍학회 제 7 차 정기총회 및 KTUG 미팅 안내 [1] file 관리자 2014.02.06 10938
485 ruby 명령 관련 [12] file nanim 2014.01.15 3095
484 hyperref 패키지의 새로운 옵션 DohyunKim 2014.01.15 4817
483 하나조노 관련 [13] file nanim 2014.01.08 16221
482 윤디자인연구소에서 대한체를 무료배포한다고 합니다. 에드 2014.01.03 16329
481 제 답변이 달린 글이 지워졌습니다. [3] nanim 2014.01.02 3701
480 2014년 새해 복 많이 받으세요 [6] Progress 2014.01.02 14615
479 원숫자 file yihoze 2014.01.02 216138
478 멍청하고 비효율적인 워드프로세서 [5] ischo 2013.12.20 18832
477 Minimal Working Example... [13] 관리자 2013.12.17 13302
476 LuaTeX 에서 listings로 프로그래밍 코드 조판 [1] file ruseel 2013.11.28 9565
475 Link시 아직 *.or.*로 된 곳이 많아요 [3] drhawks 2013.11.22 13127
474 Linux 추천 요청 [5] 초보자 2013.11.19 14431
473 [후기] 공주대 문서작성 워크숍 2013 [8] Progress 2013.11.11 36231
472 MS 워드 + 세로쓰기 모드 + 함초롬체 LVT = 옛한글이 반 글자씩 아래로 빠짐 [3] file 2013.11.10 19438



XE Login