Tarea

Su tarea es convertir cadenas como esta:

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

A cuerdas como esta:

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

Cuál es una aproximación a abc ^d + ef ^g + hijk ^l - M ^N O ^P (Ag ⁺ )

En palabras, eleva los caracteres directamente al lado de los puntos de atención a la línea superior, un carácter para un punto de referencia.

Especificaciones

• Se permiten espacios en blanco finales adicionales en la salida.
• No se darán cuidados encadenados m^n^ocomo entrada.
• Una caret no será seguida inmediatamente por un espacio o por otra caret.
• Un cursor no será precedido inmediatamente por un espacio.
• Todos los cuidados irán precedidos de al menos un carácter y seguidos de al menos un carácter.
• La cadena de entrada solo contendrá caracteres ASCII imprimibles (U + 0020 - U + 007E)
• En lugar de dos líneas de salida, puede generar una matriz de dos cadenas.

Para aquellos que hablan expresiones regulares: la cadena de entrada coincidirá con esta expresión regular:

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

Tabla de clasificación

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 bytes

ÄÒ +òf^xxé kPj

Pruébalo en línea!

Una solución bastante sencilla. ¡El desafío perfecto para V!

Explicación:

Ä                "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

Convenientemente, en función de cómo funciona la recursividad, esto se ejecutará una vez por cada cuidado.

Cheddar, 77 72 67 bytes

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

No regex!

Me encanta esta respuesta ya que es una maravillosa demostración de las habilidades de Cheddar. Principalmente gracias a la función de reemplazo agregada por Conor. El PR to dev nunca se realizó, por lo que la función de reemplazo solo existe en esta rama (actualización: hice el PR y ahora está en la última rama beta con la que puede instalar npm install -g cheddar-lang)

He encontrado una forma de jugar al golf, pero desafortunadamente una supervisión resulta en que esto suceda cuando las longitudes de los artículos no son las mismas:

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

Podría haber guardado muchos bytes usando expresiones regulares , y de hecho, acabo de hacer expresiones regulares para Cheddar ... el único problema es que no hay funciones de expresión regular: /

Explicación

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)

Para obtener una mejor comprensión. Esto es lo que .linesvuelve para1^2

["1", " 2"]

el .turncon gire esto:

1
 2

dentro:

 2
1

Otro ejemplo que lo hará más claro:

1
 2
2
 2

se convierte en:

 2 2
1 2

¿Por qué formatear?

Lo que %-2sestá haciendo es bastante simple. %especifica que estamos comenzando un "formato", o que una variable se insertará en esta cadena en este punto. -significa rellenar a la derecha la cadena y 2es la longitud máxima. Por defecto, se rellena con espacios. ssolo especifica que es una cadena. Para ver lo que hace:

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

Perl, 21 + 1 = 22 bytes

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

Corre con la -pbandera. Reemplace ♥con un ESCbyte sin formato ( 0x1b) y ↓con una pestaña vertical ( 0x0b).

La pestaña vertical es idea de Martin Ender. ¡Ahorró dos bytes! Gracias.

JavaScript (ES6), 56 55 bytes

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

Regexps al rescate por supuesto. El primero reemplaza todos los caracteres con espacios, a menos que encuentre un símbolo de intercalación, en cuyo caso elimina el símbolo de intercalación y mantiene el carácter después de él. (Se garantiza que estos personajes existen). El segundo es el obvio para reemplazar cada símbolo y su siguiente personaje con un espacio.

Editar: se guardó 1 byte gracias a @Lynn que ideó una forma de reutilizar la cadena de reemplazo para el segundo reemplazo permitiendo que el reemplazo se asigne sobre una matriz de expresiones regulares.

Python 3, 157 101 98 85 83 74 bytes

Esta solución realiza un seguimiento de si el carácter anterior era ^, luego decide si se debe enviar a la primera o segunda línea en función de eso.

Salidas como una matriz de ['firstline', 'secondline'].

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

¡Guardado 13 15 bytes gracias a @LeakyNun!

¡Guardado 7 bytes gracias a @Joffan!

Python 2, 73 bytes

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

Sin expresiones regulares. Recuerda si el carácter anterior era ^, y coloca el carácter actual en la línea superior o inferior en función de eso, y un espacio en el otro.

Pyth, 17 bytes

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

Devuelve una matriz de 2 cadenas. (Prepárese jpara unirlos con una nueva línea).

Pruébalo en línea .

MATL , 18 bytes

94=t1YSt~&vG*cw~Z)

Pruébalo en línea!

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

Ruby, 47 + 1 ( -nbandera) = 48 bytes

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

Ejecútelo así: ruby -ne 'puts$_.gsub(/\^(.)|./){$1||" "},gsub(/\^./," ")'

Python (2), 76 68 67 Bytes

-5 Bytes gracias a @LeakyNun

-3 Bytes gracias a @ KevinLau-notKenny

-1 Byte gracias a @ValueInk

-0 bytes gracias a @DrGreenEggsandIronMan

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

Esta función Lambda anónima toma la cadena de entrada como su único argumento y devuelve las dos líneas de salida separadas por una nueva línea. Para llamarlo, dale un nombre escribiendo "f =" antes.

Regex bastante simple: la primera parte reemplaza lo siguiente por un espacio: cualquier personaje y un símbolo de zanahoria o solo un char, pero solo si no hay ningún símbolo de interrogatorio antes de ellos. La segunda parte reemplaza cualquier símbolo de intercalación en la cadena y el carácter posterior por un espacio.

Convexo, 24 bytes

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

Pruébalo en línea!

Retina, 16 bytes

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

Un puerto de mi respuesta Perl, señalado por Martin Ender. Reemplace ♥por un ESCbyte sin formato ( 0x1b) y ↓con una pestaña vertical ( 0x0b).

shell + TeX + catdvi, 51 43 bytes

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

Usa texpara componer algunas matemáticas hermosas, y luego usa catdvipara hacer una representación de texto. El comando head elimina la basura (numeración de páginas, nuevas líneas finales) que de otro modo estaría presente.

Editar: ¿Por qué hacer lo largo, correcto, y redirigir a /dev/nullcuando puede ignorar los efectos secundarios y escribir en un solo archivo de carta?

Ejemplo

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

Salida de TeX (recortada a la ecuación): Salida final:

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

Suposiciones: Comience en un directorio vacío (o específicamente un directorio sin nombre que termine en "i"). La entrada es un argumento único para el script de shell. La entrada no es una cadena vacía.

Alguien me dice si esto es abuso de reglas, especialmente catdvi.

Haskell, 74 56 55 bytes

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

Devuelve un par de cadenas. Ejemplo de uso: 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 )")

ghace una lista de pares, donde el primer elemento es el carácter en la línea superior y el segundo elemento es el carácter en la línea inferior. unziplo convierte en un par de listas.

Editar: @xnor sugirió unzipque ahorra 18 bytes. @Laikoni encontró un byte más para guardar. ¡Gracias!

Perl, 35 bytes

Código de 34 bytes + 1 para -p

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

Uso

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 )

Nota: Esto es exactamente lo mismo que la respuesta de Value Ink que espié después. Se eliminará si es necesario, ya que esto realmente no se agrega a la solución Ruby.

Java 8 lambda, 132 128 112 caracteres

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;}

La versión sin golf se ve así:

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;
    }
}

Se muestra como una matriz, simplemente verificando si hay un símbolo de intercalación y, de ser así, el siguiente carácter se colocará en la fila superior, de lo contrario, habrá un espacio.

Actualizaciones

Se reemplazaron los caracteres con sus valores ascii para guardar 4 caracteres.

Gracias a @LeakyLun por señalar el uso de una matriz de caracteres como entrada en su lugar.

También gracias a @KevinCruijssen por cambiar inta charpara guardar algunos personajes más.

Coco , 122114 96 bytes

Editar: 8 26 bytes hacia abajo con la ayuda de Leaky Nun.

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')

Entonces, como aprendí hoy, python tiene un operador condicional ternario, o de hecho dos de ellos: <true_expr> if <condition> else <false_expr>y el <condition> and <true_expr> or <false_expr>último viene con un carácter menos.
Se puede idear una versión conforme a Python .

Primer intento:

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')

Llamando con f("abc^d+ef^g + hijk^l - M^NO^P (Ag^+)")huellas

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

¿Alguien ha intentado jugar al golf en coco todavía? Enriquece a Python con conceptos de programación más funcionales como la coincidencia de patrones y la concatenación de funciones (con ..) utilizadas anteriormente. Como este es mi primer intento con coco, cualquier consejo sería apreciado.

Esto definitivamente podría acortarse ya que cualquier código válido de Python también es válido y se han publicado respuestas más cortas de Python, sin embargo, intenté encontrar una solución puramente funcional.

Dyalog APL, 34 bytes

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

Devuelve un vector de dos elementos con las dos líneas.

Ejecución de muestra (la uparrow en frente es formatear el vector de dos el. Para consumo humano):

      ↑{(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 bytes

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

Un poco más largo que los otros, pero muestra un poco de magia de PowerShell y una lógica un poco diferente.

Esencialmente, el mismo concepto que las respuestas de Python: iteramos sobre la entrada carácter por carácter, recordamos si el anterior era un símbolo de intercalación ( $c) y colocamos el carácter actual en el lugar apropiado. Sin embargo, la lógica y el método para determinar dónde emitir se manejan de manera un poco diferente, y sin una tupla o variables separadas: probamos si el carácter anterior era un símbolo de intercalación, y si es así, emite el carácter a la tubería y concatena un espacio en $b. De lo contrario, verificamos si el carácter actual es un símbolo de intercalación elseif($_-94)y, siempre que no lo sea, concatenamos el carácter actual $by enviamos un espacio a la tubería. Finalmente, establecemos si el personaje actual es un símbolo para la próxima ronda.

Recopilamos esos caracteres de la tubería en parens, los encapsulamos en una -joinque los convierte en una cadena y los dejamos junto con $bla tubería. La salida al final está implícita con una nueva línea intermedia.

A modo de comparación, aquí hay un puerto directo de la respuesta Python de @ xnor , a 85 bytes :

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

Gema, 42 41 caracteres

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

Gema procesa la entrada como flujo, por lo que debe resolverla de una sola vez: la primera línea se escribe inmediatamente como procesada, la segunda línea se recopila en la variable $ s y luego la salida al final.

Ejecución de muestra:

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 )

Chicle de canela, 21 bytes

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

No competidor Pruébalo en línea.

Explicación

No soy un gran golfista de expresiones regulares, por lo que probablemente haya una mejor manera de hacerlo.

La cadena se descomprime a:

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

(tenga en cuenta el espacio final)

La primera Setapa recibe información y usa una mirada hacia atrás negativa para reemplazar todos los caracteres que no sean trazos sin un trazo anterior con un espacio, luego elimina todos los trazos. Luego emite inmediatamente la cadena de entrada modificada con una nueva línea y elimina esa Setapa. Dado que STDIN ahora está agotado y la etapa anterior no proporcionó ninguna entrada, la siguiente Setapa recibe la última línea de STDIN nuevamente y luego reemplaza todos los caracteres seguidos por cualquier carácter con un espacio y lo genera.

En el código psuedo de 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 bytes

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

Pruébalo en línea!

                  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

Tiene que haber una mejor manera...