Taxi a San Francisco

Sei un tassista a San Francisco. Come è tipico dei conducenti di taxi, stai navigando in una griglia in cui le uniche direzioni valide che puoi spostare sono sinistra, destra, su e giù. Tuttavia, San Francisco è molto collinare, quindi la distanza tra due incroci adiacenti non è necessariamente la stessa. Più specificamente, sarebbe la distanza tra un incrocio in quota ae un incrocio adiacente in quota . Il tuo obiettivo è trovare tutti i percorsi più brevi dalla tua origine in alto a sinistra della mappa alla tua destinazione in basso a destra.b1 + |a - b|

Ingresso

Una griglia bidimensionale di altitudini intere in qualsiasi formato è più conveniente (matrice bidimensionale, matrice monodimensionale con larghezza e / o altezza, ecc.).

Produzione

Una sequenza di direzioni da percorrere per arrivare nell'angolo in basso a destra dell'ingresso dall'alto in alto a sinistra nella distanza più breve possibile, data la distanza tra due intersezioni adiacenti di altitudini aed bè data dalla formula 1 + |a - b|. Se sono presenti più soluzioni, tutte le soluzioni vengono visualizzate.

Anche se io uso U, D, L, e Rper su, giù, sinistra, destra e negli esempi che seguono il programma può utilizzare qualsiasi quattro stringhe distinte per rappresentare le direzioni fino a quando è coerente con loro in e attraverso tutti gli ingressi.

Esempi

Input:
0 3 0 0 0
0 2 0 2 0
0 0 0 3 0
Output:
D D R R U U R R D D

Input:
3
Output:
<empty>

Input:
11 11 11
11 11 11
11 11 11
Output:
R R D D
R D R D
R D D R
D R R D
D R D R
D D R R

Input:
7 8 1 -1 0
4 4 6 -1 7
3 4 4  2 8
2 5 2 -1 2
Output:
D R D R R D R
D R D R D R R

Questo è code-golf, quindi vince la risposta con il numero di byte più breve.

JavaScript (ES6), 228 212 200 194 byte

a=>w=>(B=1/0,(F=(r,p,s,b=a[p])=>p-a.length+1?1/b&&([...a[p]='RDUL'].map((c,d)=>d|p%w<w-1&&d-3|p%w&&F(r+c,P=p+[1,w,-w,-1][d],s+1+Math.abs(b-a[P]))),a[p]=b):R=s>B?R:s<B?(B=s,r):R+' '+r)('',0,0),R)

Ingresso

Matrice unidimensionale ae larghezza wnella sintassi del curry(a)(w)

Produzione

Un elenco separato da spazi di soluzioni come "DRDRRDR DRDRDRR"

Formattato e commentato

a => w => (                            // given an array 'a' and a width 'w'
  B = 1 / 0,                           // B = best score so far, initialized as +Infinity
  (                                    //
    F = (                              // F = recursive function with:
      r,                               //   - r = current path (string)
      p,                               //   - p = current position in grid
      s,                               //   - s = current score
      b = a[p]                         //   - b = backup of current cell
    ) =>                               //
    p - a.length + 1 ?                 // if we haven't reached our destination:
      1 / b && (                       //   if the current cell is valid:
        [...a[p] = 'RDUL']             //     invalidate the current cell
        .map((c, d) =>                 //     for each possible direction:
          d | p % w < w - 1 &&         //       check right boundary
          d - 3 | p % w &&             //       check left boundary
          F(                           //       do a recursive call with:
            r + c,                     //         - new direction appended to the path
            P = p + [1, w, -w, -1][d], //         - updated position
            s + 1 + Math.abs(b - a[P]) //         - updated score
          )                            //
        ),                             //
        a[p] = b                       //     restore current cell value
      )                                //
    :                                  // else:
      R = s > B ?                      //   if the current score is worse than B:
        R                              //     keep the previous solution
      : s < B ?                        //   if the current score is better than B:
        (B = s, r)                     //     update best score / store path as new solution
      : R + ' ' + r                    //   if it's just as good: append path to solution
  )('', 0, 0),                         // initial call to F with r = '', p = 0, s = 0
  R                                    // return solution
)                                      //

Casi test

let f =

a=>w=>(B=1/0,(F=(r,p,s,b=a[p])=>p-a.length+1?1/b&&([...a[p]='RDUL'].map((c,d)=>d|p%w<w-1&&d-3|p%w&&F(r+c,P=p+[1,w,-w,-1][d],s+1+Math.abs(b-a[P]))),a[p]=b):R=s>B?R:s<B?(B=s,r):R+' '+r)('',0,0),R)

console.log(f([
  0, 3, 0, 0, 0,
  0, 2, 0, 2, 0,
  0, 0, 0, 3, 0
])(5));

console.log(f([
  3
])(1));

console.log(f([
  11, 11, 11,
  11, 11, 11,
  11, 11, 11
])(3));

console.log(f([
  7, 8, 1, -1, 0,
  4, 4, 6, -1, 7,
  3, 4, 4,  2, 8,
  2, 5, 2, -1, 2
])(5));