Girar um tabuleiro de damas chinês

Um tabuleiro de damas chinês se parece com este (com base nesta pergunta , mas desta vez com um tamanho fixo):

            G
           . G
          G G G
         G G . G
B B B B . . Y G . Y . Y Y
 B B B . . G . . . Y Y Y
  B . B . . . . . Y . Y
   B . . . . . . . . Y
    . . . . . . . . .
   . P . . . . . O O .
  P P . . . . . . . O O
 P P P . . . R . . O O .
P P P P . . R . . O O O O
         R . R R
          R R R
           R .
            R

Cada caractere não espacial neste exemplo pode ser substituído por qualquer caractere ASCII imprimível não espacial na entrada, enquanto os espaços nunca são alterados. Observe que não é garantido que seja um arranjo válido no verificador chinês (como talvez não tenha exatamente 7 tipos diferentes de caracteres).

Sua tarefa é girá-lo em um múltiplo de 60 graus.

Este é o exemplo acima girado 60 graus no sentido horário:

            B
           B B
          B B B
         B . B B
P P P . . . B . . G G . G
 P P P P . . . . . G G G
  P P . . . . . G Y . G
   P . . . . . . . G G
    . . . . . . . . .
   R . . . . . . . . Y
  R . R R . . . . Y Y .
 R R R . . . O . . . Y Y
R . R R . . . O . Y Y Y Y
         O O O .
          O O O
           O .
            O

A entrada é um número inteiro não negativo e um tabuleiro de damas chinês. Seu programa (ou função) deve girá-lo pelo número inteiro * 60 graus. Você decide se gira no sentido horário ou anti-horário, desde que seja consistente. Tanto a entrada como a saída não devem ter espaços iniciais ou finais extras.

Isso é código-golfe. O menor código vence.

— jimmy23013
fonte

Respostas:

CJam, 61 59 43 40 38 36 bytes

{{_N/eeSf.*:sW%zsS-\{_' >{;(}&+}/}*}

Esta é uma função anônima que espera uma sequência e um número inteiro na pilha.

Graças a @ jimmy23013 por jogar fora 19 bytes.

Experimente on-line no intérprete CJam .

Idéia

Podemos atribuir um pedido aos caracteres imprimíveis dos tabuleiros de xadrez, lendo-os para o leste e depois para o sul.

Dessa forma, o tabuleiro de damas original e girado

            G                                  B            
           . G                                B B           
          G G G                              B B B          
         G G . G                            B . B B         
B B B B . . Y G . Y . Y Y          P P P . . . B . . G G . G
 B B B . . G . . . Y Y Y            P P P P . . . . . G G G 
  B . B . . . . . Y . Y              P P . . . . . G Y . G  
   B . . . . . . . . Y                P . . . . . . . G G   
    . . . . . . . . .                  . . . . . . . . .    
   . P . . . . . O O .                R . . . . . . . . Y   
  P P . . . . . . . O O              R . R R . . . . Y Y .  
 P P P . . . R . . O O .            R R R . . . O . . . Y Y 
P P P P . . R . . O O O O          R . R R . . . O . Y Y Y Y
         R . R R                            O O O .         
          R R R                              O O O          
           R .                                O .           
            R                                  O

tornar-se

G.GGGGGG.GBBBB..YG.Y.YYBBB..G...YYYB.B.....Y.YB........Y..........P.....OO.PP.......OOPPP...R..OO.PPPP..R..OOOOR.RRRRRR.R

BBBBBBB.BBPPP...B..GG.GPPPP.....GGGPP.....GY.GP.......GG.........R........YR.RR....YY.RRR...O...YYR.RR...O.YYYYOOO.OOOO.O

respectivamente.

Podemos encontrar a segunda sequência no primeiro tabuleiro de xadrez lendo seus caracteres para nordeste e depois para sudeste.

Para conseguir isso no código, começamos por prepending n - 1 espaços para o n ^º linha do tabuleiro de xadrez (mostrado à esquerda). Em seguida, invertemos a ordem das linhas (mostradas à direita).

            G                                                       R        
            . G                                                   R .        
            G G G                                               R R R        
            G G . G                                           R . R R        
    B B B B . . Y G . Y . Y Y                       P P P P . . R . . O O O O
      B B B . . G . . . Y Y Y                       P P P . . . R . . O O .  
        B . B . . . . . Y . Y                       P P . . . . . . . O O    
          B . . . . . . . . Y                       . P . . . . . O O .      
            . . . . . . . . .                       . . . . . . . . .        
            . P . . . . . O O .                   B . . . . . . . . Y        
            P P . . . . . . . O O               B . B . . . . . Y . Y        
            P P P . . . R . . O O .           B B B . . G . . . Y Y Y        
            P P P P . . R . . O O O O       B B B B . . Y G . Y . Y Y        
                      R . R R                       G G . G                  
                        R R R                       G G G                    
                          R .                       . G                      
                            R                       G

Por fim, transpomos linhas com colunas:

                 



            B    

           BB    

          BBB    

         B.BB    

    PPP...B..GG.G

    PPPP.....GGG

    PP.....GY.G

    P.......GG

    .........

   R........Y

  R.RR....YY.

 RRR...O...YY

R.RR...O.YYYY

OOO.

OOO

O.

O

O espaço em branco está em todo o lugar, mas os caracteres imprimíveis estão na ordem correta se os lermos para o leste e depois para o sul.

Tudo o que resta a fazer é substituir o n ^º carácter de impressão do tabuleiro de xadrez originais pelo n ^º de caracteres de impressão da última modificação.

Código

                                   e# Stack: String B, Integer A
{                               }* e# Repeat A times:
 _N/                               e#   Push a copy of B and split it at linefeeds.
    ee                             e#   Enumerate the lines of B.
      Sf.*:s                       e#   Execute S.*s for each line:
                                   e#     [4 "abc"] -> "    abc"
            W%                     e#   Reverse the order of line lines.
              z                    e#   Zip; transpose rows with columns.
               s                   e#   Flatten the arrays of strings.
                S-                 e#   Remove spaces.
                                   e#   This pushes a string L.
                  \{          }/   e#   For each character C in the unmodified B:
                    _' >           e#     Check if C is bigger than ' '.
                        {  }&      e#     If it is:
                         ;(        e#      Discard C and shift out a char from L.
                             +     e#     Append a char (C or from L) to L.
                                   e#  L is B rotated by 60 degrees. Set L := B.

— Dennis
fonte

_,,Sf*\.+W%ze_.

— precisa saber é o seguinte

@ jimmy23013: Muito melhor do que minha abordagem de classificação. Obrigado!

— Dennis

liq{_N/eeSf.*W%:szsS-\{_' >{;(}&\}/;]}@*, Mas eu estava pensando em rotação em 60 graus, e não 45 graus quando eu estava escrevendo este desafio ...

— jimmy23013

@ jimmy23013: Uau, obrigado! I foi tentar uma abordagem diferente, mas qN/(i{_eeSf.*W%:szSf-{},.{' f+sW<\,' e[}}*N*é ainda mais do que o que eu tinha antes ...

— Dennis

Python 2, 171 bytes

def f(S,n):
 o="";E=enumerate;B=S.splitlines(1)
 for r,l in E(B):
  for c,q in E(l):z=r-8;y=6-(z+c)/2;x=-y-z;exec"x,y,z=-y,-z,-x;"*n;o+=q*(q<"!")or B[z+8][12-y+x]
 print o

Esta é talvez a única vez que eu achei str.splitlinesútil - para todas as outras vezes, .split("\n")é mais curta.

Use como f(S,10).

Explicação

Para cada caractere na entrada, nós:

Mantenha-o se for um espaço ou uma nova linha, ou
Substitua-o pelo caractere correto, caso contrário

Para descobrir qual caractere substituir, convertemos a grade em coordenadas do cubo (x, y, z) , giramos os ntempos transformando (x, y, z) -> (-y, -z, -x)e depois convertemos de volta.

— Sp3000
fonte