Dibujar y etiquetar una cuadrícula hexagonal ASCII

12

En mi desafío anterior , dibujé el primer diagrama principalmente a mano (con la ayuda del modo de bloqueo visual de vim). Pero seguramente debe haber una mejor manera ...


Dada una entrada de dos dimensiones, un ancho y una altura, genera una cuadrícula hexagonal con esas dimensiones en el arte ASCII.

Aquí está el diagrama al que se hace referencia en la introducción (con ediciones menores), que debería ser su salida para la entrada width=7, height=3:

         _____         _____         _____
        /     \       /     \       /     \
  _____/ -2,-1 \_____/  0,-1 \_____/  2,-1 \_____
 /     \       /     \       /     \       /     \
/ -3,-1 \_____/ -1,-1 \_____/  1,-1 \_____/  3,-1 \
\       /     \       /     \       /     \       /
 \_____/ -2,0  \_____/  0,0  \_____/  2,0  \_____/
 /     \       /     \       /     \       /     \
/ -3,0  \_____/ -1,0  \_____/  1,0  \_____/  3,0  \
\       /     \       /     \       /     \       /
 \_____/ -2,1  \_____/  0,1  \_____/  2,1  \_____/
 /     \       /     \       /     \       /     \
/ -3,1  \_____/ -1,1  \_____/  1,1  \_____/  3,1  \
\       /     \       /     \       /     \       /
 \_____/       \_____/       \_____/       \_____/

Observe varias cosas:

  • El ancho y la altura son esencialmente equivalentes a cuántos hexágonos hay para una coordenada y y x dada, respectivamente. Estos siempre serán números impares.

  • Cada hexágono está representado por el arte ASCII

      _____
     /     \
    /       \
    \       /
     \_____/
    

    pero las fronteras son "compartidas" entre hexágonos vecinos.

  • La coma en las coordenadas siempre es exactamente dos caracteres debajo del centro del borde superior. La coordenada x se coloca directamente antes de la coma y la coordenada y directamente después.

    Puede suponer que las coordenadas nunca serán demasiado grandes de modo que se superpongan con los bordes del hexágono.

La entrada puede tomarse como una cadena separada por comas / espacios en blanco, una matriz de enteros o dos argumentos de función / línea de comando. La salida debe ser una sola cadena (a STDOUT, como valor de retorno, etc.).

Como se trata de , el código más corto en bytes ganará.

La cuadrícula de arriba se puede usar como un caso de prueba. La width=199, height=199cuadrícula de tamaño máximo es obviamente poco práctica para incluir aquí, pero las primeras filas y columnas deberían tener el siguiente aspecto:

         _____         ___
        /     \       /   
  _____/-98,-99\_____/-96,
 /     \       /     \    
/-99,-99\_____/-97,-99\___
\       /     \       /   
 \_____/-98,-98\_____/-96,
 /     \       /     \    
/-99,-98\_____/-97,-98\___
\       /     \       /   
 \_____/-98,-97\_____/-96,
 /     \       /     \    
/-99,-97\_____/-97,-97\___
\       /     \       /   
Pomo de la puerta
fuente
Relacionado
Alex A.

Respuestas:

2

Rubí, 221 bytes

->w,h{s=' '
a=(s*9+?_*5)*(w/2)+$/
(2-h*2).upto(h*2+3){|y|c=y<4-h*2 
a+=[b=c ?s:?\\,s+b,s,''][y%4]
(0-w/2).upto(w/2){|x|a+=["/#{h<y/2?s*7:"%3d,%-3d"}\\",s*7,?_*5,"/     \\"][(y+x*2+w)%4]%[x,y/4]}
a+='//  '[c ?3:y%4]+$/}
a}

Sin golf en el programa de prueba

f=->w,h{
  s=' '                                #set s to space for golfing reasons
  a=(s*9+?_*5)*(w/2)+$/                #start building the output with a row of just _ and space

  (2-h*2).upto(h*2+3){|y|              #iterate 4 times for each row of hexagons, plus an extra 2 at the end to finish last row
    c=y<4-h*2                          #condition for first two rows
    a+=[b=c ?s:?\\,s+b,s,''][y%4]      #string to be output before main set of hexagons (spaces for top row, \ for certain other rows

    (0-w/2).upto(w/2){|x|              #iterate through hexagons on each row, 4 lines for each with the following printf type string
      a+=["/#{h<y/2?s*7:"%3d,%-3d"}\\",#line 1:contains ends / \ and numbers 
         s*7,                          #line 2 padding spaces
         ?_*5,                         #line 3 padding ___
         "/     \\"][(y+x*2+w)%4]%     #line 0 top of hexagon / \; formula to select string to be printed
           [x,y/4]                     #numbers to be printed (if format for current line does not require them they are ignored)
    }

    a+='//  '[c ?3:y%4]+$/             #ending alternates between / and space; / are suppressed for first two rows
  }
  a
}

puts g[7,3]
puts g[5,5]

Salida

Cuando estaba terminando de depurar, noté una ambigüedad en la especificación. Donde w+1es divisible por 4, la primera y la última coordenada x son impares y no hay ambigüedad. Pero donde w-1es divisible por 4, las primeras y últimas coordenadas x son pares. Supuse que la primera y la última columna deberían estar desplazadas debajo de las siguientes. Pero luego leí la pregunta anterior y noté en ese caso que las columnas impares debían compensarse por debajo de las pares (tenga en cuenta que para w-1divisible por 4 no es posible hacer ambas cosas).

Sin embargo, esa distinción no se hizo en esta pregunta. Dejaré esto a juicio de OP y volver a trabajar si es necesario, aunque preferiría no tener que hacerlo.

         _____         _____         _____
        /     \       /     \       /     \
  _____/ -2,-1 \_____/  0,-1 \_____/  2,-1 \_____
 /     \       /     \       /     \       /     \
/ -3,-1 \_____/ -1,-1 \_____/  1,-1 \_____/  3,-1 \
\       /     \       /     \       /     \       /
 \_____/ -2,0  \_____/  0,0  \_____/  2,0  \_____/
 /     \       /     \       /     \       /     \
/ -3,0  \_____/ -1,0  \_____/  1,0  \_____/  3,0  \
\       /     \       /     \       /     \       /
 \_____/ -2,1  \_____/  0,1  \_____/  2,1  \_____/
 /     \       /     \       /     \       /     \
/ -3,1  \_____/ -1,1  \_____/  1,1  \_____/  3,1  \
\       /     \       /     \       /     \       /
 \_____/       \_____/       \_____/       \_____/
         _____         _____
        /     \       /     \
  _____/ -1,-2 \_____/  1,-2 \_____
 /     \       /     \       /     \
/ -2,-2 \_____/  0,-2 \_____/  2,-2 \
\       /     \       /     \       /
 \_____/ -1,-1 \_____/  1,-1 \_____/
 /     \       /     \       /     \
/ -2,-1 \_____/  0,-1 \_____/  2,-1 \
\       /     \       /     \       /
 \_____/ -1,0  \_____/  1,0  \_____/
 /     \       /     \       /     \
/ -2,0  \_____/  0,0  \_____/  2,0  \
\       /     \       /     \       /
 \_____/ -1,1  \_____/  1,1  \_____/
 /     \       /     \       /     \
/ -2,1  \_____/  0,1  \_____/  2,1  \
\       /     \       /     \       /
 \_____/ -1,2  \_____/  1,2  \_____/
 /     \       /     \       /     \
/ -2,2  \_____/  0,2  \_____/  2,2  \
\       /     \       /     \       /
 \_____/       \_____/       \_____/
Level River St
fuente