CJam, 139 byte
Bene, ci sono volute molte ore per arrivare a qualcosa che sembra fatto. Sembra che il tempo necessario per ottimizzare in modo aggressivo il codice CJam sia qualcosa di più grande di O (n) rispetto alla dimensione del codice ...
Puoi provarlo online , ma per qualsiasi input per il quale il percorso migliore è almeno 6 operazioni o giù di lì, dovresti probabilmente provarlo offline con un interprete più veloce.
schiacciata:
q_'$-_'^-:T;'^#\'^-'$#W{)2$5Y$5b+{:D[L"_T<W%_N#)_@>N+N#X-Ue>+-"_"W%-U"--2'<t2'>t'++'(')]=~0e>T,e<D3/1$T<N\+W%N#X?:X;}/2$-}g5b{" ^v<>"=}%]W=
Ampliato e commentato:
q "Read the input";
_'$- "Remove the end marker";
_'^-:T; "Remove the start marker and save the text";
'^# "With only the end marker removed, locate the start marker";
\'^-'$# "With only the start marker removed, locate the end marker";
W "Initialize the path number to -1";
{ "Do...";
) "Increment the path number";
2$ "Initialize the cursor position to that of the start marker";
5Y$5b+ "Convert the path number to base 5, then add a leading 5
(the leading 5 will act to initialize the column memory)";
{:D "For each digit in the path digit string:";
[ "Begin cases:";
L "0: Do nothing";
"_T<W%_N#)_@>N+N#X-Ue>+-"
"REFS: [ 1 ][ 2 ][ 3 ]45
1: [1] Calculate the distance to the end of the previous
line (0 if no such line)
[2] Calculate the length of the previous line (0 if
no such line)
[3] Calculate the distance to move backwards in the
previous line as the maximum of the length of the
previous line minus the column memory and 0
[4] Calculate the total distance to move as the sum
of [1] and [3]
[5] Subtract [4] from the cursor position";
_"W%-U"- "2: Start with a base of the logic of case 1, but with a
few operations adjusted.";
-2'<t2'>t " [1] Calculate the distance to the *start* of the
*next* line (0 if no such line)
[2] Calculate the length of the *next* line (0 if no
such line)
[3] Calculate the distance to move *forwards* in the
*next* line as the *minimum* of the length of the
*next line* and *the column memory*
[4] Calculate the total distance to move as the sum
of [1] and [3]";
'++ " [5] *Add* [4] *to* the cursor position";
'( "3: Decrement the cursor position";
') "4: Increment the cursor position";
]=~ "Execute the case corresponding to the path digit mod 5";
0e>T,e< "Clamp the cursor position to [0, text length]";
D3/ "Check if the path digit is not 0, 1, or 2...";
1$T<N\+W%N# "Calculate the current column";
X?:X; "If the above check succeeded, update the column memory";
}/ "End for each";
2$- "Subtract the end marker position from the cursor position";
}g "... While the above subtraction is nonzero";
5b "Convert the path number to base 5";
{" ^v<>"=}% "Map each digit in the path string to its operation symbol";
]W= "Clean up";
Nel complesso, questa è una soluzione piuttosto semplice. "Esegue" le cifre della rappresentazione base-5 di un numero di percorso che viene incrementato ogni iterazione, iniziando con 0, fino a quando un percorso funziona. Le cifre 1: 4mappano le operazioni su, giù, sinistra e destra e 0non fanno nulla. La prima iterazione che utilizza un percorso 0cattura solo il caso degenerato. Tutti gli altri percorsi che contengono un 0non vengono mai selezionati perché sono solo versioni di percorsi già testati con aggiunte non operative.
Lo stato è modellato nel modo più minimalista possibile: il testo con i marcatori di inizio e fine rimossi, la posizione del cursore nel testo e la "memoria di colonna". Le newline sono per lo più trattate come qualsiasi altro personaggio, quindi non esiste un concetto di riga e la posizione del cursore è solo un indice. Ciò semplifica lo spostamento dei morti sinistro e destro, che sono solo implementati come decremento e incremento (con il bloccaggio sulla dimensione del testo). Muoversi su e giù è un po 'più complicato, ma comunque gestibile.
Il riutilizzo del codice era una tattica di ottimizzazione piuttosto vitale. Esempi di questo includono:
- Scrivere il codice per spostarsi verso l'alto in modo tale che sia più piccolo generare il codice per spostarsi verso il basso in fase di esecuzione piuttosto che scrivere il proprio codice. Questo viene fatto copiando il codice per spostarsi verso l'alto e rimuovere / sostituire alcuni caratteri.
- L'aggiornamento della "memoria di colonna" viene eseguito in modo condizionale in base alla cifra del percorso divisa per 3 anziché essere codificata nella logica dell'operazione. Ciò consente anche l'inizializzazione della memoria della colonna aggiungendo un'operazione fittizia
5all'inizio della stringa del percorso, che in tal caso utilizza anche la 0logica no-op a causa dell'indicizzazione dell'array circolare e ci sono solo 5 operazioni definite.
Nel complesso, sono molto contento di come è venuto fuori. Questa è sicuramente la maggior parte del lavoro che ho messo in una risposta di code golf ad oggi (per qualcosa che si adatta a un tweet !?). Il tempo di esecuzione è piuttosto spaventoso, però. CJam non è esattamente il linguaggio più veloce per cominciare e questo algoritmo ha una complessità simile a O (m * 5 n ) , dove m è la dimensione dell'input e n è la dimensione dell'output. Per fortuna la velocità non conta!