Código de vírus vs antídotos golf [fechado]

11

Existe uma matriz 2D retangular que contém vírus denotados por 'v', antídoto1 denotado por 'a' e antídoto2 denotado por 'b' (não existem valores diferentes de 'v', 'a' e 'b').

O antídoto1 pode matar os vírus vizinhos apenas nas direções horizontal e vertical, mas o antídoto2 pode matar os vírus vizinhos (se houver) nas direções horizontal, vertical e diagonal.

Uma vez ativados os antídotos, quantos vírus permanecerão no final?

Exemplos:

Entrada:

vv
vv

Saída: 4

Entrada:

av
vv

Saída: 1

Entrada:

vvv
vbv
vvv

Saída: 0

Entrada:

bvb
bav
vab
vvv
vvb
vvv
vvv
bva
vav

Saída: 3

Kiara Dan
fonte
2
Eu aprecio as suas edições @Grimy - Também agradável desafio :)
pixma140
2
@KevinCruijssen, não é de forma irregular.
Kiara Dan
4
Podemos tomar 3 valores arbitrários (distintos) em vez de "v", "a" e "b"?
attinat 30/07/19
2
os antivírus são agrupados (isto é, "a" na linha inferior remove um "v" na linha superior)?
30719 Brian
2
@Kiara Dan Eu recomendaria não permitir três valores distintos, pois mantém algum caráter no desafio, bem como a esperteza forçada possível com pontos de código das letras.
31719 lithosiast

Respostas:

8

Python 3 , 135 bytes

j=''.join
p='j(s)'+4*'.replace("%s%s","%s%s")'%(*'vbbbbvbbavacvaca',)
f=lambda x:j(eval(2*'(eval(p)for s in zip(*'+'x))))')).count('v')

Experimente online!

-2 bytes graças a Kevin Cruijssen

Explicação

Substitui tudo 'v' por 'b' se encontrado próximo a 'b'. Em seguida, substitui todos os 'v' por 'c' se localizados ao lado de 'a'. Uma segunda iteração com a versão transposta da matriz limpa todos os vírus verticais e diagonais. Finalmente, ele retornará o número restante de 'v's.


Como uma função recursiva mais legível (155 bytes)

Jitse
fonte
3
Você pode remover o espaço depois y>1else. Abordagem agradável embora. No começo, eu não tinha certeza de como isso lida com a diagonal b, mas isso parece funcionar muito bem devido às suas substituições. :) +1 de mim.
Kevin Cruijssen 30/07/19
@KevinCruijssen Thanks! As diagonais são resolvidas substituindo 'v' por 'a' se estiverem próximas a 'b'. Na segunda iteração, os 'v's adjacentes são removidos.
Jitse
3
Para a entrada seguinte, a saída deve ser de 3, mas seu retorno 4: bvb BAV VAB vvv VVB vvv vvv bva vav
Kiara Dan
1
@KevinCruijssen Encontrou um ainda mais curto, mas sua sugestão economiza outro byte!
Jitse
5

JavaScript (ES7), 108 bytes

Recebe entrada como uma matriz de caracteres.

f=m=>(g=(y,X,V)=>m.map(r=>r.map((v,x)=>V?v>f&V>'a'>(x-X)**2+y*y-2?r[x]=n--:0:v<f?g(-y,x,v):n++)|y++))(n=0)|n

Experimente online!

Semelhante à minha resposta original, mas fazer V>'a'>(x-X)**2+y*y-2é na verdade 1 byte mais curto do que usar o truque hexa descrito abaixo. ¯ \ _ (ツ) _ / ¯


JavaScript (ES7), 109 bytes

Recebe entrada como uma matriz de caracteres.

f=m=>(g=(y,X,V)=>m.map(r=>r.map((v,x)=>V?v>f&(x-X)**2+y*y<V-8?r[x]=n--:0:v<f?g(-y,x,'0x'+v):n++)|y++))(n=0)|n

Experimente online!

Quão?

A1=(x1,y1)A2=(x2,y2)

Q(A1,A2)=(x2x1)2+(y2y1)2

Considerando coordenadas inteiras, tem a seguinte aparência:

854585212541145212585458

Portanto:

  • A1A2Q(A1,A2)<2
  • A1A2Q(A1,A2)<3

238

  • A16810=210
  • B16810=310

Comentado

f =                      // named function, because we use it to test if a character
                         // is below or above 'm'
m => (                   // m[] = input matrix
  g = (                  // g is a recursive function taking:
    y,                   //   y = offset between the reference row and the current row
    X,                   //   X = reference column
    V                    //   V = reference value, prefixed with '0x'
  ) =>                   //
    m.map(r =>           // for each row r[] in m[]:
      r.map((v, x) =>    //   for each value v at position x in r[]:
        V ?              //     if V is defined:
          v > f &        //       if v is equal to 'v'
          (x - X) ** 2 + //       and the quadrance between the reference point and
          y * y          //       the current point
          < V - 8 ?      //       is less than the reference value read as hexa minus 8:
            r[x] = n--   //         decrement n and invalidate the current cell
          :              //       else:
            0            //         do nothing
        :                //     else:
          v < f ?        //       if v is either 'a' or 'b':
            g(           //         do a recursive call:
              -y,        //           pass the opposite of y
              x,         //           pass x unchanged
              '0x' + v   //           pass v prefixed with '0x'
            )            //         end of recursive call
          :              //       else:
            n++          //         increment n
      ) | y++            //   end of inner map(); increment y
    )                    // end of outer map()
  )(n = 0)               // initial call to g with y = n = 0
  | n                    // return n
Arnauld
fonte
obrigado @Arnauld, você também pode explicar o código?
Kiara Dan
3
@KiaraDan Done.
Arnauld
3

05AB1E , 33 30 29 bytes

2F.•s¯}˜?•2ô€Â2ä`.:S¶¡øJ»}'v¢

Experimente online ou verifique mais alguns casos de teste .

Porto da resposta Python 3 do @Jitse , por isso não deixe de vota-lo!
-1 byte graças a @Jitse .

Explicação:

A versão legada tem a vantagem de poder zipar / transpor uma lista de strings, onde a nova versão precisaria de uma explícita Se J, uma vez que só funciona com listas de caracteres. Mas, a nova versão ainda é 3 bytes mais curta, usando €Âem combinação com uma string compactada mais curta. Na versão herdada, apenas manteria o último valor na pilha dentro do mapa, mas na nova versão, manterá todos os valores na pilha dentro do mapa.

2F                  # Loop 2 times:
  .•s¯}˜?•          #  Push compressed string "vbvabbca"
   2ô               #  Split it into parts of size 2: ["vb","va","bb","ca"]
     €Â             #  Bifurcate (short for duplicate & reverse copy) each:
                    #   ["vb","bv","va","av","bb","bb","ca","ac"]
       2ä           #  Split it into two parts:
                    #   [["vb","bv","va","av"],["bb","bb","ca","ac"]]
         `          #  Push both those lists separated to the stack
          .:        #  Replace all strings once one by one in the (implicit) input-string
            S       #  Then split the entire modified input to a list of characters
             ¶¡     #  Split that list by newlines into sublists of characters
               ø    #  Zip/transpose; swapping rows/columns
                J   #  Join each inner character-list back together to a string again
                 »  #  And join it back together by newlines
}'v¢               '# After the loop: count how many "v" remain

Veja este 05AB1E ponta do meu (seção Como cordas compressa não fazem parte do dicionário? ) Para entender por que .•s¯}˜?•é "vbvabbca".

Kevin Cruijssen
fonte
Você não precisa bc=> base aplicar bv=> baantes av=> ac. Assim .•6øнãI•(a forma compactada de "" bvavbaac ") é suficiente, economizando 2 bytes.
Grimmy
@ Grimy No entanto, resulta em 1 em vez de 3 no último caso de teste .
Kevin Cruijssen 30/07/19
1
@KevinCruijssen dois passos em vez de três de substituição parece fazer o truque depois de tudo
Jitse
@Jitse Obrigado. A cadeia de compactação é 2 bytes mais curta, mas agora preciso .:(substituir tudo uma vez) em vez de :(continuar substituindo tudo até que não esteja mais presente). Ainda -1, no entanto. :) Obrigado por me avisar.
Kevin Cruijssen 31/07/19
2

Java 10, 211 209 bytes

m->{int i=m.length,j,c=0,f,t,I,J;for(;i-->0;)for(j=m[i].length;j-->0;c+=m[i][j]>98?f/9:0)for(f=t=9;t-->0;)try{f-=m[I=i+t/3-1][J=j+t%3-1]==98||Math.abs(I-i+J-j)==1&m[I][J]<98?1:0;}catch(Exception e){}return c;}

Modificação da minha resposta para o desafio Todos os Oitos Individuais .
-2 bytes graças a @ceilingcat .

Experimente online.

Explicação:

m->{                           // Method with char-matrix parameter & int return-type
  int i=m.length,              //  Amount of rows
      j,                       //  Amount of columns
      c=0,                     //  Virus-counter, starting at 0
      f,                       //  Flag-integer
      t,I,J;                   //  Temp-integers
  for(;i-->0;)                 //  Loop over the rows of the matrix
    for(j=m[i].length;j-->0    //   Inner loop over the columns
        ;c+=                   //     After every iteration: increase the counter by:
            m[i][j]>98         //      If the current cell contains a 'v'
             f/9               //      And the flag is 9:
                               //       Increase the counter by 1
            :0)                //      Else: leave the counter unchanged by adding 0
      for(f=t=9;               //    Reset the flag to 9
          t-->0;)              //    Loop `t` in the range (9, 0]:
         try{f-=               //     Decrease the flag by:
           m[I=i+t/3-1]        //      If `t` is 0, 1, or 2: Look at the previous row
                               //      Else-if `t` is 6, 7, or 8: Look at the next row
                               //      Else (`t` is 3, 4, or 5): Look at the current row
            [J=j+t%3-1]        //      If `t` is 0, 3, or 6: Look at the previous column
                               //      Else-if `t` is 2, 5, or 8: Look at the next column
                               //      Else (`t` is 1, 4, or 7): Look at the current column
            ==98               //      And if this cell contains a 'b'
            ||Math.abs(I-i+J-j)==1
                               //      Or if a vertical/horizontal adjacent cell
              &m[I][J]<98?     //      contains an 'a'
               1               //       Decrease the flag by 1
            :0;                //      Else: leave the flag unchanged by decreasing with 0
         }catch(Exception e){} //     Catch and ignore any ArrayIndexOutOfBoundsExceptions,
                               //     which is shorter than manual checks
  return c;}                   //  And finally return the virus-counter as result
Kevin Cruijssen
fonte
1

Carvão , 39 bytes

WS⊞υι≔⪫υ⸿θPθ≔⁰ηFθ«≧⁺›⁼ιv⁺№KMb№KVaηι»⎚Iη

Experimente online! Link é a versão detalhada do código. Explicação:

WS⊞υι≔⪫υ⸿θPθ

Junte as seqüências de \rcaracteres de entrada com caracteres e desenhe o resultado na tela.

≔⁰η

Limpe o número de vírus vivos.

Fθ«

Faça um loop sobre os caracteres na entrada.

≧⁺›⁼ιv⁺№KMb№KVaη

Se o caractere atual for um vírus e não houver bs adjacentes em nenhuma direção ou as ortogonalmente, aumente o número de vírus vivos.

ι»

Repita com o próximo caractere.

⎚Iη

Limpe a tela e imprima o número total de vírus vivos.

Neil
fonte
1

Perl ( -00lp), 82 bytes

Usando regex para substituir vpelo espaço, conte os vs

/.
/;$,="(|..{@-})";$;="(|.{@-,@+})";$_=s/(a$,|b$;)\Kv|v(?=$,a|$;b)/ /s?redo:y/v//

TIO

Nahuel Fouilleul
fonte