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


번호 제목 글쓴이 날짜 조회 수
371 패닉 [6] 에드 2012.02.10 18998
370 일반 문서 작성용으로 LaTeX 이용하시는 분들 계실까요? [2] algorist 2017.02.02 19055
369 TL2012 최근 업데이트에서 updmap 실행시 잘못된 맵 파일 바로잡는 법 Progress 2012.07.25 19164
368 늦게나마 가입 인사를 드립니다. [1] 修盡 2013.07.04 19208
367 texlive 2013의 최근 tlmgr 업데이트 에러 [1] file nanim 2013.09.18 19231
366 TeXLive2012 업데이트 실패 [2] file yihoze 2012.08.30 19269
365 Readium 프로젝트 [3] 에드 2013.02.19 19280
364 MS 워드 + 세로쓰기 모드 + 함초롬체 LVT = 옛한글이 반 글자씩 아래로 빠짐 [3] file 2013.11.10 19438
363 KTUG 여러분 [7] file Progress 2012.12.31 19530
362 안드로이드 ICS에 새로 추가된 폰트, '로보토' 에드 2012.07.10 19713
361 2013 수학 달력 [9] file puzzlist 2013.01.04 19760
360 배달의민족 한나체, 주아체 무료 배포 [5] sjnam 2014.06.24 20024
359 안녕하세요. [2] 핑귄 2012.02.17 20214
358 [안내] 2013 공주대 문서작성 워크숍 Progress 2013.09.10 20228
357 오랜만에 설치했는 데, 역시 단번에 되네요. 감사합니다. 양사장 2013.08.16 20264
356 결국 oblivior 는 KNUworkshop 스타일로 모이게 되네요... [4] 불량양파 2016.11.07 20305
355 한국텍학회 2010 학술대회 및 정기총회 감상문 [1] yihoze 2010.02.01 20329
354 section후 첫문장에서 들여쓰기 file 샘처럼 2011.04.15 20517
353 개인적으로 진행하고있던 첫 TeX 작업을 끝냈습니다. [6] 불량양파 2013.08.04 20522
352 [참가신청] 문서작성 위크숍 2012 [6] ischo 2012.10.09 20539



XE Login