태스크

당신의 임무는 다음과 같이 문자열을 변환하는 것입니다.

abc^d+ef^g + hijk^l - M^NO^P (Ag^+)

이 같은 문자열로 :

   d   g       l    N P    +
abc +ef  + hijk  - M O  (Ag )

abc ^d + ef ^g + hijk ^l -M ^N O ^P (Ag ⁺ )에 대한 근사치

즉, 캐럿 바로 옆에있는 문자를 상위 행으로, 한 캐럿에 대해 한 문자 씩 올리십시오.

명세서

• 출력에서 추가 후행 공백이 허용됩니다.
• 같은 체인 된 캐럿 m^n^o은 입력으로 제공 되지 않습니다 .
• 캐럿 바로 뒤에 공백이나 다른 캐럿이 오는 것은 아닙니다.
• 캐럿 바로 앞에 공백이 생기지 않습니다.
• 모든 캐럿 앞에는 하나 이상의 문자가오고 그 뒤에 하나 이상의 문자가옵니다.
• 입력 문자열에는 인쇄 가능한 ASCII 문자 만 포함됩니다 (U + 0020-U + 007E)
• 두 줄의 출력 대신 두 개의 문자열 배열을 출력 할 수 있습니다.

정규 표현식을 사용하는 사람들에게는 입력 문자열이 다음 정규 표현식과 일치합니다.

/^(?!.*(\^.\^|\^\^|\^ | \^))(?!\^)[ -~]*(?<!\^)$/

리더 보드

var QUESTION_ID=86647,OVERRIDE_USER=48934;function answersUrl(e){return"http://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"http://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

V , 15 14 바이트

ÄÒ +òf^xxé kPj

온라인으로 사용해보십시오!

상당히 간단한 솔루션입니다. 완벽한 V에 대한 도전!

설명:

Ä                "Duplicate this current line
 Ò               "Replace this line with spaces
   +             "Move to the beginning of the next line
    ò         ò  "Recursively (The second ò is implicit):
     f^          "  Find a caret
       xx        "  Delete two characters. The second will be saved into the main register
         é       "  Insert a space
           k     "  Move up
            P    "  Paste from the main register
             j   "  Move down

편리하게는 재귀의 작동 방식에 따라 매 캐럿마다 한 번씩 실행됩니다.

체다, 77 72 67 바이트

l->l.chars.vfuse.replace("^\n"," ").lines.map(j->"%-2s"%j).turn(3)

정규식이 없습니다!

나는 체다의 능력에 대한 훌륭한 시연이기 때문에이 답변을 좋아합니다. 주로 Conor가 추가 한 바꾸기 기능 덕분입니다. 개발할 PR은 만들어지지 않았으므로 바꾸기 기능 만 존재합니다. 은이 지점 (업데이트 : PR을 만들었고 이제는 설치할 수있는 최신 베타 지점에 있습니다 npm install -g cheddar-lang)

골프를 치는 방법을 찾았지만 불행히도 감독은 항목 길이가 같지 않을 때 이런 일이 발생합니다.

["   denifednud   denifednug       denifednul    denifednuN denifednuP    denifednu+ ", "abcdenifednu +efdenifednu  + hijkdenifednu  - Mdenifednu Odenifednu  (Agdenifednu )"]

정규식을 사용하여 많은 바이트를 절약 할 수 있었고 실제로 단지 체다 치즈 정규 표현식에했다 ... 유일한 문제는 정규식 기능이 없다는 것입니다 : /

설명

l->                    // Function take input as `l`
   l.chars             // Get array of chars in input
   .vfuse              // Join with newlines
   .replace("^\n"," ") // Replace `^\n` with a space globally
   .lines              // Get the lines (see below for more details on what this returns)
   .map(j->            // Loop through each "line" `j` is arg
       "%-2s"          // C-like printf format.
                       // think of as: padRight(j, " ", 2)
                       // see below for more details
        % j            // Pass j as the string to insert
   ).turn(3)           // Turn the string 270 degrees (see below)
   .vfuse              // Vertically fuse to get result (this is not needed as we can output an array of the lines)

더 나은 이해를 위해. 이것은 무엇입니까.lines 반환하는 것입니다1^2

["1", " 2"]

그만큼 .turn회전이 가진 :

1
 2

으로:

 2
1

더 명확하게 만드는 또 다른 예 :

1
 2
2
 2

된다 :

 2 2
1 2

왜 형식입니까?

무엇을 %-2s하고있는 것은 매우 간단하다. %"형식"을 시작하거나이 시점에서 변수가이 문자열에 삽입되도록 지정합니다. -문자열을 오른쪽으로 채우는 것을 의미 2하며 최대 길이입니다. 기본적으로 공백으로 채워집니다. s문자열임을 지정합니다. 그것이하는 일을 보려면 :

"%-2s" % "a"  == "a "
"%-2s" % " a" == " a"

펄, 21 + 1 = 22 바이트

say'';s/\^(.)/♥[A\1↓/

-p플래그로 실행하십시오 . 대체 ♥원료로 ESC(바이트 0x1b) 및 ↓(수직 탭0x0b )으로 .

세로 탭은 Martin Ender의 아이디어입니다. 2 바이트를 절약했습니다! 감사.

자바 스크립트 (ES6), 56 55 바이트

s=>[/.(\^(.))?/g,/\^.(())/g].map(r=>s.replace(r,' $2'))

물론 구조에 대한 정규식. 첫 번째 문자는 캐럿을 찾지 않으면 모든 문자를 공백으로 바꿉니다.이 경우 캐럿을 삭제하고 그 뒤에 문자를 유지합니다. (이 문자들은 반드시 존재합니다.) 두 번째 문자는 각 캐럿과 그 뒤에 나오는 문자를 공백으로 바꾸는 명백한 문자입니다.

편집 : @Lynn 덕분에 1 바이트를 절약했습니다. 교체는 대체 문자열을 두 번째 대체에 재사용하여 대체가 정규 표현식 배열에 매핑되도록합니다.

파이썬 3 157 101 98 85 83 74 바이트

이 솔루션은 이전 문자가인지 여부를 추적 ^한 다음이를 기반으로 첫 번째 또는 두 번째 행에 출력할지 여부를 결정합니다.

의 배열로 출력합니다 ['firstline', 'secondline'].

a=['']*2
l=0
for c in input():x=c=='^';a[l]+=c*x;a[~l]+=' '*x;l=x
print(a)

저장 (13) (15)는 @LeakyNun 덕분에 바이트!

@Joffan 덕분에 7 바이트가 절약되었습니다!

파이썬 2, 73 바이트

l=['']*2;p=1
for c in input():b=c!='^';l[p]+=c*b;l[~p]+=' '*b;p=b
print l

정규식이 없습니다. 이전 문자가 이었는지 기억 ^하고, 현재 문자를 기준으로 맨 위 또는 맨 아래 줄에, 다른 하나의 공백을 넣으십시오.

Pyth, 17 바이트

CcsmX~Z1j;d;cQ\^2

             Q      input string
            c \^    split on '^'
   m                map for sections d:
    X      ;          insert a space at index:
     ~Z1                the old value of Z (initially 0), before setting Z to 1
                      into:
        j;d             the section joined on spaces
  s                 concatenate
 c              2   chop into groups of 2
C                   transpose

2 개의 문자열 배열을 반환합니다. (접두사j 줄 바꿈으로 결합하기 전에)

온라인으로 사용해보십시오 .

MATL , 18 바이트

94=t1YSt~&vG*cw~Z)

온라인으로 사용해보십시오!

94=    % Take input implicitly. Create logical array of the same size that contains
       % true for carets, false otherwise
t      % Push a copy of this array
1YS    % Circularly shift 1 unit to the right. This gives an array that contains true
       % for the elements right after a caret (superindices), and false for the rest 
t~     % Push a copy and negate
&v     % Concatenate vertically. This gives a 2D, 2-row array
G*     % Push the input again, multiply with broadcast. This gives a 2D array in
       % which the first row contains the superindices (characters after a caret)
       % and 0 for the rest; and the second row contains the non-superindices and
       % 0 for the superindices
c      % Convert to char
w      % Swap. Brings to top the array containing true for carets and false otherwise
~      % Negate
Z)     % Use as logical index to remove rows that contain carets. Display implicitly

루비, 47 + 1 ( -n플래그) = 48 바이트

puts$_.gsub(/\^(.)|./){$1||" "},gsub(/\^./," ")

다음과 같이 실행하십시오. ruby -ne 'puts$_.gsub(/\^(.)|./){$1||" "},gsub(/\^./," ")'

파이썬 (2), 76 68 67 바이트

@LeakyNun 덕분에 -5 바이트

@ KevinLau-notKenny 덕분에 -3 바이트

@ValueInk 덕분에 -1 바이트

@DrGreenEggsandIronMan 덕분에 -0 바이트

import re
lambda i,s=re.sub:[s("(?<!\^).\^?"," ",i),s("\^."," ",i)]

이 익명 Lambda 함수는 입력 문자열을 유일한 인수로 사용하여 두 줄을 개행으로 구분하여 반환합니다. 이를 호출하기 전에 "f ="를 작성하여 이름을 지정하십시오.

매우 간단한 정규 표현식 : 첫 번째 부분은 다음 문자를 공백으로 바꿉니다. 캐릭터와 당근 캐럿 또는 문자 만 있지만 캐럿이없는 경우에만 가능합니다. 두 번째 부분은 문자열의 캐럿과 그 뒤의 문자를 공백으로 바꿉니다.

볼록, 24 바이트

®(?<!\^).\^?"SòNê®\^."Sò

온라인으로 사용해보십시오!

레티 나, 16 바이트

S`^
\^(.)
♥[A$1↓

Martin Ender가 지적한 내 Perl 답변 포트. ♥원시 ESC바이트 ( 0x1b)와 ↓세로 탭 ( 0x0b)으로 교체하십시오 .

shell + TeX + catdvi, 51 43 바이트

tex '\empty$'$1'$\end'>n;catdvi *i|head -n2

용도는 tex아름다운 수학을 조판하고 사용하는 catdvi텍스트 표현을 할 수 있습니다. head 명령은 다른 방법으로 정크를 제거합니다 (페이지 번호 매기기, 후행 줄 바꿈).

편집 : /dev/null부작용을 무시하고 단일 문자 파일에 쓸 수있을 때 길고 적절하며 리디렉션되는 이유는 무엇 입니까?

예

입력: abc^d+ef^g + hijk^l - M^NO^P (Ag^+)

TeX 출력 (방정식으로 잘림) : 최종 출력 :

   d   g     l  N P   +
abc +ef +hijk -M O (Ag )

가정 : 빈 디렉토리 (또는 "i"로 끝나는 이름이없는 디렉토리)에서 시작하십시오. 입력은 쉘 스크립트에 대한 단일 인수입니다. 입력이 빈 문자열이 아닙니다.

누군가가 이것이 규칙 남용인지 특히 말해줍니다 catdvi.

하스켈, 74 56 55 바이트

g('^':c:r)=(c,' '):g r
g(c:r)=(' ',c):g r
g x=x
unzip.g

한 쌍의 문자열을 반환합니다. 사용 예 : unzip.g $ "abc^d+e:qf^g + hijk^l - M^NO^P: (Ag^+)"->(" d g l N P + ","abc +e:qf + hijk - M O : (Ag )")

g쌍의 목록을 작성합니다. 여기서 첫 번째 요소는 상단 라인의 문자이고 두 번째 요소는 하단 라인의 문자입니다. unzip한 쌍의 목록으로 바꿉니다.

편집 : @xnor unzip은 18 바이트를 절약 할 것을 제안했습니다 . @Laikoni는 저장할 바이트를 하나 더 발견했습니다. 감사!

펄, 35 바이트

34 바이트 코드 + 1 -p

$_=s/\^(.)|./$1||$"/ger.s/\^./ /gr

용법

perl -pe '$_=s/\^(.)|./$1||$"/ger.s/\^./ /gr' <<< 'abc^d+ef^g + hijk^l - M^NO^P (Ag^+)'
   d   g       l    N P    + 
abc +ef  + hijk  - M O  (Ag )

참고 : 이것은 나중에 검색 한 Value Ink 의 답변 과 정확히 동일 합니다. 루비 솔루션에 실제로 추가되지 않으므로 필요한 경우 제거합니다.

자바 8 람다, 132 128 112 문자

i->{String[]r={"",""};for(char j=0,c;j<i.length();j++){c=i[j];r[0]+=c==94?i[++j]:32;r[1]+=c==94?32:c;}return r;}

ungolfed 버전은 다음과 같습니다.

public class Q86647 {

    static String[] printExponents(char[] input) {
        String[] result = {"",""};
        for (char j = 0, c; j < input.length(); j++) {
            c = input[j];
            result[0] += c == 94 ? input[++j] : 32;
            result[1] += c == 94 ? 32 : c;
        }
        return result;
    }
}

캐럿이 있는지 여부를 확인하여 배열로 출력하므로 다음 문자가 맨 위 행에 배치되고 그렇지 않으면 공백이 생깁니다.

업데이트

4자를 저장하기 위해 문자를 ASCII 값으로 대체했습니다.

대신 char 배열을 입력으로 사용하도록 지적 한 @LeakyLun에게 감사드립니다.

더 많은 문자를 저장 int하기 char위해 를 전환 해 주신 @KevinCruijssen에게 감사드립니다 .

코코넛 , 122114 96 바이트

편집 : Leaky Nun의 도움으로 8 26 바이트 다운.

def e(s,l)=''==l and s or"^"==l[0]and l[1]+e(s+' ',l[2:])or' '+e(s+l[0],l[1:])
f=print..e$('\n')

그래서 오늘 파이썬을 배운 삼항 조건 연산자를 가지고, 또는 사실 그들 중 두 : <true_expr> if <condition> else <false_expr>와 <condition> and <true_expr> or <false_expr>함께 마지막 한 문자 적은 비용으로 오는.
파이썬 버전이 될 수 준수 ideoned .

첫번째 시도:

def e(s,l):
 case l:
  match['^',c]+r:return c+e(s+' ',r)
  match[c]+r:return' '+e(s+c,r)
 else:return s
f=print..e$('\n')

f("abc^d+ef^g + hijk^l - M^NO^P (Ag^+)")지문으로 전화

   d   g       l    N P    +
abc +ef  + hijk  - M O  (Ag )

코코넛에서 아직 골프를 타 본 사람이 있습니까? 패턴 매칭 및 함수 연결과 같은보다 기능적인 프로그래밍 개념으로 파이썬을 풍부하게합니다...위에 사용 된 ) 합니다. 이것이 코코넛에 대한 첫 번째 시도이므로 모든 팁을 주시면 감사하겠습니다.

유효한 파이썬 코드도 유효한 코코넛이고 짧은 파이썬 답변이 게시되어 있기 때문에 이것은 분명히 단축 될 수 있지만 순수하게 기능적인 솔루션을 찾으려고 노력했습니다.

Dyalog APL, 34 바이트

{(0 1=⊂b/¯1⌽b){⍺\⍺/⍵}¨⊂⍵/⍨b←⍵≠'∧'}

두 줄로 구성된 요소를 2 개 가진 벡터를 반환합니다.

샘플 실행 (앞의 위쪽 화살표는 사람이 소비 할 수 있도록 2 행 벡터를 형식화하는 것입니다)

      ↑{(0 1=⊂b/¯1⌽b){⍺\⍺/⍵}¨⊂⍵/⍨b←⍵≠'∧'}'abc∧d+ef∧g + hijk∧l - M∧NO∧P (Ag∧+)'
   d   g       l    N P    + 
abc +ef  + hijk  - M O  (Ag )

PowerShell v2 +, 88 83 바이트

-join([char[]]$args[0]|%{if($c){$_;$b+=' '}elseif($_-94){$b+=$_;' '}$c=$_-eq94});$b

다른 것보다 조금 길지만 작은 PowerShell 마법과 약간 다른 논리를 보여줍니다.

본질적으로 파이썬이 대답하는 것과 동일한 개념입니다. 우리는 문자별로 입력을 반복하고 이전 개념이 캐럿인지 여부를 기억합니다 ($c ) 하고 현재 문자를 적절한 지점에 넣습니다. 그러나 출력 위치를 결정하는 논리와 방법은 약간 다르게 처리되며 튜플 또는 별도의 변수가 없습니다. 이전 문자가 캐럿인지 테스트하고 문자를 파이프 라인에 출력하고 공백을 연결하는 경우 $b. 그렇지 않으면 현재 문자가 캐럿인지 확인하고 그렇지 않은 elseif($_-94)한 현재 문자를 연결 $b하고 파이프 라인에 공백을 출력합니다. 마지막으로, 현재 캐릭터가 다음 고 라운드에 대한 캐럿인지 여부를 설정했습니다.

파이프 라인에서 해당 문자를 모아서 함께 모아서 -join 문자열로 바꾸고 그것을 그대로 둡니다.$b 파이프 라인에 . 마지막에 출력은 그 사이에 줄 바꿈이 내재되어 있습니다.

비교를 위해 다음 은 85 바이트 의 @ xnor 's Python answer 의 직접 포트입니다 .

$a=,''*2;[char[]]$args[($l=0)]|%{$a[!$l]+="$_"*($c=$_-ne94);$a[$l]+=' '*$c;$l=!$c};$a

Gema, 42 41 자

\^?=?@set{s;$s }
?=\ @append{s;?}
\Z=\n$s

Gema는 입력을 스트림으로 처리하므로 한 번에 해결해야합니다. 첫 번째 행은 처리 된대로 즉시 작성되고 두 번째 행은 변수 $ s에 수집 된 다음 끝에 출력됩니다.

샘플 실행 :

bash-4.3$ gema '\^?=?@set{s;$s };?=\ @append{s;?};\Z=\n$s' <<< 'abc^d+ef^g + hijk^l - M^NO^P (Ag^+)'
   d   g       l    N P    +  
abc +ef  + hijk  - M O  (Ag )

계피 껌, 21 바이트

0000000: 5306 6533 bd92 d1db 8899 8381 a2f8 8f8c  S.e3............
0000010: 1230 249e a1                             .0$..

비경쟁. 온라인으로 사용해보십시오.

설명

나는 정규식 골퍼가별로 없기 때문에 더 좋은 방법이있을 것입니다.

문자열은 다음과 같이 압축 해제됩니다.

S(?<!\^)[^^]& &\^&`S\^.& 

(후행 공백에 유의하십시오)

첫 번째 S단계는 입력을 받고 음수 비하인드를 사용하여 선행 캐럿이없는 캐럿 이외의 모든 문자를 공백으로 바꾼 다음 모든 캐럿을 삭제합니다. 그런 다음 수정 된 입력 문자열을 줄 바꿈과 함께 즉시 출력하고 해당 S단계를 제거합니다 . STDIN이 이제 소진되었고 이전 단계에서 입력을 제공하지 않았으므로 다음 단계S 단계는 STDIN의 마지막 행을 다시 수신 한 다음 모든 캐럿 뒤에 문자를 공백으로 바꾸고 출력합니다.

Perl 의사 코드에서 :

$first_stage_sub_1 = ($input =~ s/(?<!\^)[^^]/ /gr);
$first_stage_sub_2 = ($first_stage_sub_1 =~ s/\^//gr);
print $first_stage_sub_2, "\n";

$second_stage_sub = ($input =~ s/\^./ /gr);
print $second_stage_sub, "\n";

J , 28 27 바이트

0|:t#]{."0~_1-_1|.t=.'^'~:]

온라인으로 사용해보십시오!

                  t=.'^'~:]    0 for ^, 1 for the rest, define t
              _1|.             Shift right, now zeroes are for superscripts         
     ]{."0~_1-                 Prepend that many spaces to each character
   t#                          Remove the rows with carets
0|:                            Transpose

더 좋은 방법이 있어야합니다 ...