Lägger till eller lägger till? beror

DJMcMayhem 04/29/2017. 6 answers, 427 views
code-golf string balanced-string classification brain-flak

Brain-flak blir ett år gammalt i morgon! För att hedra det är födelsedagen, har vi en födelsedagsfest i PPCG-stil, där flera användare lägger in frågor som rör hjärnflak! Hjälp oss att fira! :)


Brain-flak är ett esoteriskt språk jag skrev där alla kommandon är parenteser och alla parenteser måste vara helt matchade. Att låna min egen definition :

  • För denna utmaning är en "konsol" någon av dessa tecken: ()[]{}<> .

  • Ett par parentes anses vara "matchade" om öppnings- och stängningsfästena är i rätt ordning och inte har några tecken inuti dem, till exempel

    ()
    []{} 

    Eller om varje delelement inuti det också matchas.

    [()()()()]
    {<[]>}
    (()()) 

    Subelements kan också nästas flera lager djupt.

    [(){<><>[()]}<>()]<[{((()))}]> 
  • En sträng anses vara "helt matchad" om och endast om:

    1. Varje enskild karaktär är en konsol,

    2. Varje par parentes har rätt öppnings- och stängningsfäste och i rätt ordning

För att fira hjärnflakens första födelsedag handlar dagens utmaning om att ta en obalanserad uppsättning parentes och bestämma vilka typer av operationer som behövs för att göra den till en bra hjärnflak.

  • Till exempel (( är inte giltig hjärnflakkod, men om vi lägger till )) blir den (()) , som är helt balanserad, och därmed gäller hjärnflak. Det gör den här inmatningen appendable .

  • På samma sätt är >} inte giltigt, men vi kan förordna {< till det för att göra {<>} , vilket är giltigt. Det gör det här prependable .

  • Vissa ingångar är lite mer komplicerade. Till exempel, )][({ kan inte göras rent endast genom att lägga till eller förpenga. Men det can göras giltigt genom att lägga ut [( och bifoga })] . Därför är denna ingång både prependable och appendable .

  • Slutligen kan vissa ingångar aldrig göras giltig hjärnflikk kod med någon kombination av tillägg eller prepending. Till exempel kan (> aldrig göras giltigt. (Förutbestämning < skapar <(> och bifogad ) skapar (>) , varav ingen är giltiga) Därför är denna ingång varken tilläggbar eller förbeställbar.

För dagens utmaning måste du skriva ett program eller en funktion som tar en rad parentes och bestämmer om strängen är

appendable
prependable
both
neither 

Du kan välja vilka värden du använder för att representera för varje enskilt fall. Till exempel utmatar 1, 2, 3, 4 eller 'a', 'p', 'b', 'n' eller 1, 'foo', 3.1415, -17 eller vad som är bra. Så länge varje produkt är distinct och consistent , så är det bra. Du must dock tydligt ange vilken produkt som motsvarar vilket fall.

Du kan returnera det här värdet i vilket format som är mest lämpligt (till exempel, retur från en funktion, utskrift till STDOUT, modifiering av argument, skrivning till en fil, etc.).

Du kan anta att ingången aldrig kommer att vara giltig hjärnflik eller tom.

exempel

Följande ingångar är alla prependable :

))
(((()()())))}
)>}]
()[]{}<>) 

Dessa är alla appendable :

(({}{})
((((
([]()())(
{<<{ 

Dessa är both :

))((
>()[(()){
>{ 

Och det här är inte neither alla:

)(}
{(((()()()))>[}
((((((((((>((((((((((<>()] 

Som vanligt är detta , så standardmolekyler gäller och det kortaste svaret i byte vinner!


Denna utmaning är särskilt svår i hjärnflak, så maximal brownie pekar på varje svar som skrivs i hjärnflak. :)

5 Comments
1 Erik the Outgolfer 04/29/2017
maximum brownie points Jag tror att att erbjuda maximal brownie poäng och kakor istället skulle uppmuntra Brain-Flaking denna utmaning mer än bara brownie poäng, eftersom jag inte tycker att det är trivialt alls på any språk, än mindre Brain-Flak. : P
Jonathan Allan 04/29/2017
FYI: Alla båda testen slutar med öppna fästen, alla testen slutar med nära fästen.
1 orlp 04/29/2017
Jag skulle hävda att "båda" är fel term. En sträng som ][ not läggas till, eftersom ingenting du kan lägga till kan göra det giltigt. På samma sätt är det inte förbeställbart. Det är ... "insertable"! Du kan infoga den i en sträng för att göra hela giltiga Brainflak.
Funky Computer Man 04/30/2017
Är redan balanserade strängar både eller varken?
DJMcMayhem 04/30/2017
@wheatwizard Balanserade strängar kommer inte att ges som input. You can assume that the input will never be valid brain-flak or empty.

6 Answers


Jonathan Allan 04/29/2017.

Jelly , 33 32 37 35 34 bytes

buggen hittade, hemsk fixa +5 byte, bättre fixa - 2 byte, med ett knep av Adnan såg jag här för -1 mer.

“({[<“)}]>”Z;@WœṣF¥/µÐLO‘&2µIṀ>0ȯQ 

Returvärden:

prepends [2]
 appends [0]
    both [2,0]
 neither 1 

(Ogiltig inmatning returnerar falska resultat, även om giltigt Brain-flack returnerar [] .)

Try it online! - En testpaket (skriv ut mushed representationer, så 20 för [2,0] , och ignorerar linjer som innehåller någon - ).


Cows quack 04/29/2017.

Näthinnan , 41 40 41 bytes

1 byte saved thanks to @MartinEnder

+`\(\)|\[]|{}|<>[]})>]+
1
\W+
0
...+
01 

Prova det online!

  • Förbeställbar är 1
  • Appendable är 0
  • Båda är 10
  • Ingen är 01

redigeringar

  • Gick 1 byte för att fixa felet märkt av @Neil
5 comments
Martin Ender♦ 04/29/2017
[]})>] sparar en byte.
Cows quack 04/29/2017
@MartinEnder Ah, det beror på att teckenuppsättningar inte kan vara tomma, tack!
Neil 04/29/2017
Det här fungerar inte för alla icke-tilläggsbara inmatningar, till exempel (][) . Jag tror att det kan fixas till en kostnad av en byte genom att ändra 101 till ...+ .
Cows quack 04/29/2017
@Neil Tack för att du märker felet, undrar jag om det finns sådana fall med Both också
Neil 04/29/2017
Nej, jag tror 10 är den enda giltiga kombinationen för Both .

Neil 04/29/2017.

Batch, 337 byte

@echo off
set/ps=
:g
set "t=%s:<>=%
set "t=%t:()=%
set "t=%t:[]=%
set "t=%t:{}=%
if not "%t%"=="%s%" set "s=%t%"&goto g
set "s=%s:<=[%
set s=%s:>=]%
set s=%s:(=[%
set s=%s:)=]%
set s=%s:{=[%
set s=%s:}=]%
:l
if %s:~,2%==]] set s=%s:~1%&goto l
:r
if %s:~-2%==[[ set s=%s:~,-1%&goto l
if not _%s:~2%==_ set s=[]
echo %s% 

Outputs ] för prepend, [ för append, ][ för båda, [] för varken.


Ørjan Johansen 04/29/2017.

Haskell , 115 108 byte

REDIGERA:

  • -7 byte: Använd fler vakter.
 (""#)
s#""=[s>"",1>0]
s#(c:d)|Just a<-lookup c$zip"([{<"")]}>"=(a:s)#d|(a:b)<-s=[1|a==c]>>b#d|0<1=take 1$s#d 

Prova det online!

Använd som (""#) "))" . Resultaten ges som:

 [False,True]: needs nothing
[False]: prependable
[True,True]: appendable
[True]: both
[]: neither 

Hur det fungerar

  • Utmatningskodningen väljs så att ett behov av att förordnas signaleras genom att det andra elementet av resultatet släpps för resten, om någon, medan en fullständig felpassning signaleras genom att släppa alla dem.
  • s#d analyserar en återstående sträng d , med en sträng / stapel s av förväntade stängningsfästen.
    • s#"" linjen kontrollerar om alla stängningsfästen har hittats i slutet av strängen, annars behövs tillägg.
    • Den första gren av s#(c:d) kontrollerar om nästa tecken c är en öppningsfäste, och om så lämnar motsvarande stängningsfäste på stapeln för rekursionen.
    • Annars, om stapeln innehåller stängningsfästen, kontrollerar den andra grenen om den översta matchar nästa tecken, och om inte, returnerar en tom lista i stället för att återgå.
    • Slutligen, i den sista filialen är stapeln tom, och vi har en oöverträffad stängningsfäste som kan fixas genom att lägga ut, innan återanvändning.

ETHproductions 04/29/2017.

Japt , 44 bytes

=Ue"%(%)|%[]|\{}|<>" ®c -1&2|1})f31 |UfD |Ug 

Outputs 1 för prependable, 3 for appendable, 13 för båda och 31 för varken.

Testa det på nätet! eller verifiera alla testfall samtidigt.

Hur det fungerar

=Ue"%(%)|%[]|\{}|<>" ®   c -1&2|1})f31 |UfD |Ug
U=Ue"%(%)|%[]|\{}|<>" mZ{Zc -1&2|1})f31 |UfD |Ug

                    // "(((()()())))}"  "([({}{})"    ">()[(()){"  "((((<>()]"
Ue"%(%)|%[]|\{}|<>" // Recursively remove all instances of "()", "[]", "{}", and "<>" from U.
                    // "}"              "(["          ">[{"        "((((]"
mZ{Zc -1&2|1}       // Replace each char Z with (Z.charCodeAt() - 1) & 2 | 1.
                    // "1"              "33"          "133"        "33331"
U=                  // Save the result in U.
f31 |UfD |Ug        // Match all instances of "31" and "13" (D = 13) and bitwise-OR the results with the first char.
                    // null|null|1      null|null|3   null|13|1    31|null|3
                    // 1                3             13           31
                    // Implicit: output result of last expression 

Jörg Hülsermann 06/04/2017.

PHP, 137 Bytes

for($c=1;$c;)$a=preg_replace("#<>|\(\)|\[\]|\{\}#","",$a=&$argn,-1,$c);echo($a=preg_replace(["#[]})>]+#","#[[{(<]+#"],[1,2],$a))<13?$a:0; 

1 => appendable,

2 => prependable,

12 => båda,

0 => varken

Testfall

2 comments
Cyoce 06/04/2017
"Så länge varje utdata är distinkt och consistent, så är det bra". Detta verkar inte ha ett konsekvent värde för varken.
Jörg Hülsermann 06/04/2017
@Cyoce Det är nu Fixed

Related questions

Hot questions

Language

Popular Tags