Bir ASCII harfleri dizisi (büyük ve / veya küçük harf) verildiğinde, her karakterde ikiye bölünen dizgeyi görüntülemek için gereken ham MathJax'ı üst kodlara ve abonelere aktarın. Örneğin, girişler catve horseMathJax'ın sırasıyla aşağıdaki şekilde verdiği çıkışlarla sonuçlanacaktır:

Sadece bir giriş yapılması gerektiğine dikkat edin - bu iki yan yana sadece dikey alan tasarrufu sağlamak için listelenir.

Biçimlendirme anlamı

• _ bir aboneliği gösterir.
• ^ bir üst metni gösterir.
• Hepsinin aynı seviyede olmasını engellemek için daha fazla üst yazı veya alt yazı içeren alt veya üst alt dizgilerin etrafına diş telleri gerekir.

Test durumları

Test durumları biçimindedir input : output. İlk sınama durumu, boş dizenin giriş olarak boş dizge çıktısı olarak çıkması gerektiğini gösterir.

"" : ""
"a" : "a"
"me" : "m_e^e"
"cat" : "c_{a_t^t}^{a_t^t}"
"frog" : "f_{r_{o_g^g}^{o_g^g}}^{r_{o_g^g}^{o_g^g}}"
"horse" : "h_{o_{r_{s_e^e}^{s_e^e}}^{r_{s_e^e}^{s_e^e}}}^{o_{r_{s_e^e}^{s_e^e}}^{r_{s_e^e}^{s_e^e}}}"
"bifurcate" : "b_{i_{f_{u_{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}^{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}}^{u_{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}^{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}}}^{f_{u_{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}^{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}}^{u_{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}^{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}}}}^{i_{f_{u_{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}^{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}}^{u_{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}^{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}}}^{f_{u_{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}^{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}}^{u_{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}^{r_{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}^{c_{a_{t_e^e}^{t_e^e}}^{a_{t_e^e}^{t_e^e}}}}}}}"

Çıktının mathurl.com'a yapıştırarak bunların nasıl oluşturulduğunu görebilirsiniz .

Yedek diş teli yok

MathJax, gereksiz parantezleri içeren bir işaretleme oluşturacaktır. Render Örneğin, şu bütün aynı görünümde olacaktır: a, {a}, {}{a}, {{{{a}}}}.

Bununla birlikte, bu zorluğun geçerli çıktısının fazladan destekleri yok. Özellikle çıktıdaki tek karakterlerin parantezlerle çevrili olmadığını unutmayın.

Sipariş

Abonelik ve üst simge sırası önemsizdir. Aşağıdakiler eşdeğerdir ve işlendiklerinde ayırt edilemezler (ve hepsi aynı derecede geçerli çıktılardır):

c_{a_t^t}^{a_t^t}
c_{a^t_t}^{a_t^t}
c_{a_t^t}^{a^t_t}
c_{a^t_t}^{a^t_t}
c^{a_t^t}_{a_t^t}
c^{a^t_t}_{a_t^t}
c^{a_t^t}_{a^t_t}
c^{a^t_t}_{a^t_t}

puanlama

Her dil için, kazanan bayt cinsinden en kısa koddur.

_{Çok fazla bildirim var mı? Tip}unsubscript için</sub>

Python, 95 90 86 92 82 bayt

@ConnerJohnston sayesinde 10 bayt kurtarıldı

f=lambda s:s and s[0]+(s[1:]and'_{0}^{0}'.format(s[2:]and'{'+f(s[1:])+'}'or s[1]))

Çevrimiçi deneyin!

Mathematica, 72 84 77 76 bayt

a_±b__:={"{",a,"_",±b,"^",±b,"}"};±(a_:""):={"",a,""};""<>Most@Rest@±##&@@#&

CP-1252 (Windows) kodlamasını kullanır. Girdi olarak bir karakter listesi alır.

açıklama

a_±b__:=

±2 veya daha fazla argümanla fonksiyonu tanımlayın . İlk argümanı etiketleyin, aikincisi de açık b.

{"{",a,"_",±b,"^",±b,"}"}

Bir oluşturma Listiçin eşdeğer "{a_±b^±b}"( ±bolan yinelemeli tekrar değerlendirilir).

±(a_:""):= ...

Fonksiyonu ±, 1 veya 0 argümanıyla tanımlayın . İlk argüman Etiket avarsa, ve atamak ""için aaksi.

{"",a,""}

Boş s ile doldurulmuş bir Listeşdeğer oluşturun ."a"String

""<>Most@Rest@±##&@@#&

Geçerlidir Saf fonksiyon ±girişi, ilk ve son elemanı ve dönüştürür damla Listiçin String.

CJam (35 bayt)

MqW%{"^{ }_{ }"{AW$,)3e<#<},S/@*+}/

Bu tam bir programdır. Çevrimiçi demo .

3 bayt tercüman bir hata etrafında çalışır (aşağıya bakınız).

teşrih

M            e# Start building from the empty string
qW%{         e# For each character in the reversed input
  "^{ }_{ }" e#   Take a template
  {          e#   If the accumulator is of length n, remove all characters whose
    A        e#   codepoints are greater than pow(10,
    W$,)3e<  e#                                   min(n+1, 3))
    #<       e#   When the accumulator is the empty string, that's all of them.
  },         e#   When the accumulator is one character, that's {}
             e#   When the accumulator is any longer, it's none of them.
  S/@*       e#   Substitute the accumulator for the spaces.
  +          e#   Append to the new character.
}/

min(n+1, 3)Tercümandaki bir hatanın üstesinden gelmek olduğuna dikkat edin : 10'luk güçlerde '}bundan daha küçük bir kalıp olmalıdır , ancak bu açık değildir .

JavaScript (ES6), 57 55 bayt

f=([c,...s])=>s+s?c+`_${p=s[1]?`{${f(s)}}`:s}^`+p:c||''

Θ (len (s)) karmaşıklığı! @PeterTaylor'a göre, bu aslında Θ (2 ^ len (s)), ki hala en iyisi ...

Haskell , 71 bayt

f[x,y]=x:'_':y:'^':y:[]
f(x:y@(_:_))=x:"_{"++f y++"}^{"++f y++"}"
f x=x

Çevrimiçi deneyin!

Sadece geçerli bir kod vermemiz gerekirse, aşağıdakiler 44 bayt için işe yarar:

f[a]=[a]
f(a:b)=a:"_{"++f b++"}^{"++f b++"}"

Çevrimiçi deneyin!

SOGL V0.12 , 21 bayt

±K;{╔+;lH?"{ŗ}”}1 ^Ο+

Burada dene!

Açıklama:

±                      reverse the string
 K                     take off the first letter - will slowly convert to the output
  ;                    get the rest of the string ontop
   {                   iterate over the rest of the characters
    ╔+                   append "_" to it
      ;                  get the output string ontop
       lH?     }         if it's length - 1 [isn't 0]
          "{ŗ}”            push the string "{ŗ}" where ŗ is replaced by the output string
                1 ^Ο     wrap "^" around with the output string
                    +    prepend to it the current character + "_"

Perl 5 , 54 + 1 (-p) = 55 bayt

s/\{(.)\}/$1/g while s/([a-z])([a-z]+)/$1_{$2}^{$2}/ig

Çevrimiçi deneyin!

Nasıl?

Süre durumundaki ikame, ilk harfteki çoklu harflerin oluşumunu bozar, bunu takip eden parantez içinde diğerleri:

abc -> a_{bc}^{bc}

While döngüsü, çok harfli diziler kalmayana kadar yerine geçme işlemini gerçekleştirir. Döngünün içindeki yer değiştirme, tek harflerin etrafındaki destekleri kaldırır.

Ruby , 76 73 72 68 67 57 bayt

Tutleman sayesinde 4 byte tasarruf sağlayan lambda kullanımı

f=->s{(r=s[1..-1])[0]?s[0]+?_+[r[1]??{+f[r]+?}:r]*2*?^:s}

Çevrimiçi deneyin!

Ungolfed:

def f(s)
  r = s[1..-1]
  if r.size > 0
    if r.size > 1
      x = "{" + f(r) + "}"
    else
      x = r
    end
    return s[0] + "_" + [x, x].join("^")
  else
    return s
  end
end

Python 2 , 84 bayt

def b(s):q=s and(s[2:]and'{%s}'or'%s')%b(s[1:]);return s[1:]and s[0]+'^%s_'%q+q or s

Çevrimiçi deneyin!

Pyth , 47 bayt

Ljk[hb|&ttbs[\_\{ytb"}^{"ytb\})&tbs[\_htb\^htb;

Çevrimiçi deneyin!

Bu hemen hemen @ Uriel'in Python cevabının düz bir limanıdır. Birazdan golf oynayacak.

PHP, 121 bayt

function b($s){return $s[0].($s[1]?'_'.($s[2]?'{'.($b=b(substr($s,1))).'}^{'.$b.'}':"$s[1]^$s[1]"):'');}echo b($argv[1]);

İşlev, 104 bayttır ve bir PHP Bildirimi gösterir.

Retina , 43 bayt

(.)(.)$
$1¶$2
+`(.)¶(.*)
¶{$1_$2^$2}
¶{|}$

Çevrimiçi deneyin! Link, test durumlarını içerir. Açıklama:

(.)(.)$
$1¶$2

Son karakteri keserek topu yuvarlayın. (Ama tek karakterse, onu rahat bırakın.)

+`(.)¶(.*)
¶{$1_$2^$2}

Result karakterini, her seferinde bir önceki adıma geçip bir sonraki karakterin alt simgesi ve üst simgesi haline getirerek, her defasında bir adım geri götürün.

¶{|}$

Şimdi gereksiz ¶ ve dış {} s'yi sökün.

Java (OpenJDK 8) , 121 bayt

s->{int l=s.length;String r=--l<0?"":""+s[l];for(;l-->0;)r="{"+s[l]+"_"+r+"^"+r+"}";return r.replaceAll("^\\{|\\}$","");}

Çevrimiçi deneyin!

Javascript, 73 Bayt

s=>[...s].reduceRight((m,c)=>`${c}_{${m}}^{${m}}`).replace(/{(.)}/g,'$1')

açıklama

s=>                                  // take the input string
    [...s]                           // split the string into an array
    .reduceRight(                    // reduce the array in reverse order
        (m,c)=>`${c}_{${m}}^{${m}}`  // storing the result of each iteration in the memo m
    )                                // and returning m at the end
    .replace(/{(.)}/g,'$1')          // replace redundant {}

Hiçbir başlangıç değeri var belirtilmiş olduğundan m, reduceRightson elemanını alır sbaşlangıç değeri olarak ve endeksinde iterating başlar s.length-2.

const f=s=>[...s].reduceRight((m,c)=>`${c}_{${m}}^{${m}}`).replace(/{(.)}/g,'$1');

const input = document.querySelector('#input');
const output = document.querySelector('#output');
output.textContent = f(input.value);
input.addEventListener('keyup', e => output.textContent = f(input.value));

Enter text to bifurcate: <input type="text" id="input" value="cat" />
<br />
<span id="output"></span>