Znajdź stóg siana w igłach

18

Aby znaleźć igłę w stogu siana, musisz znaleźć największy ciągły stóg siana zawierający dokładnie jedną igłę . Pamiętaj, że nie można łączyć komórek na przekątnych, tylko w lewo / w prawo / w górę / w dół.

Wejście

Tablica (lub kilka wierszy wprowadzania przez użytkownika, wybór ) znaków 'N'(igły) i '#'(siana). Dane wejściowe zawierają tylko te dwa znaki i muszą zawierać co najmniej jeden z nich. Na przykład:

N#N#N
#NN##
###N#
N##N#

Wynik

Rozmiar największego możliwego prawidłowego stogu siana. W naszym przykładzie wyprowadzilibyśmy 11 (jest 11 sztuk siana i jedna igła).

   # 
#  ##
###N#
 ## #

To jest , więc wygrywa najkrótszy kod. Obowiązują standardowe ograniczenia dotyczące luk.

Przypadki testowe

Wejście po lewej, możliwy maksymalny stóg siana po prawej

Przypadek 1: 4

N##    ##
NN#     #
#NN     N
#N#     #

Przypadek 2: 7

###   ###
N#N    # 
NNN    N 
###   ###

Przypadek 3: 10

N###N    ### 
#N#N#   #N#  
#N#N#   # #  
N###N    ###

Przypadek 4: 10

N#N#N        
#N#N#   # # #
##N##   ##N##
#N#N#   # # #
N#N#N        

Przypadek 5: 1

NN#NN        
NNNNN         
#NNN#   #N    
NN#NN        
Adam Martin
źródło

Odpowiedzi:

4

JavaScript (ES6), 152 bajty

s=>[...s].map((n,i)=>n>'M'&&(a=[...s],a[i]=r=1,a.map(_=>a.map((c,j)=>c=='#'&&a[j+1]|a[j-1]|a[j+l]|a[j-l]?a[j]=++r:0)),o=r>o?r:o),o=0,l=~s.search`
`)|o-1

Wyjaśnienie

Dla każdej igły na wejściu ustawia igłę na część stogu siana (reprezentowaną przez ustawienie jej na niezerową liczbę) i stale sprawdza komórki siana. Jeśli siano zawiera przylegającą część stosu siana, również ustawia go jako część stogu siana i zwiększa rozmiar stosu siana. Wysyła najwyższy wynik.

var solution =

s=>
  [...s].map((n,i)=>n>'M'&&(          // for each needle in s at index i
      a=[...s],                       // a = array of each character in s
      a[i]=1,                         // set the starting needle to 1 (haystack)
      r=0,                            // r = haystack size starting from this needle
      a.map(_=>                       // loop to ensure the complete haystack is found
        a.map((c,j)=>                 // for each cell c at index j
          c=='#'&&                    // if the current cell is hay
          a[j+1]|a[j-1]|a[j+l]|a[j-l] // and any adjacent cells are part of the haystack
          ?a[j]=++r:0                 // add the current cell to the haystack, increment r
        )
      ),
      o=r>o?r:o                       // o = max of o and r
    ),
    o=0,                              // o = final output, initialise to 0
    l=~s.search`
`                                     // l = line length of s
  )
  |o                                  // return o
<textarea id="input" rows="6" cols="40">N#N#N
#N#N#
##N##
#N#N#
N#N#N</textarea><br />
<button onclick="result.textContent=solution(input.value)">Go</button>
<pre id="result"></pre>

użytkownik 81655
źródło
4

Ruby, 207

->a{d=->b{0...b.size}
f=c=s=->y,x{(d[a]===y&&d[a[0]]===x&&!f[y][x]&&a[y][x]==c)?(c,f[y][x]=?#,1
1+s[y,x-1]+s[y,x+1]+s[y-1,x]+s[y+1,x]):0}
d[a].map{|y|d[y].map{|x|f,c=a.map{|b|b.map{p}},?N
s[y,x]}.max}.max-1}

Jest to anonimowa funkcja, która pobiera dane wejściowe jako tablicę tablic. Stosowanie:

f=->a{......}

f["
N##
NN#
#NN
#N#
".strip.split.map(&:chars)] # => 4

Proc o nazwie srekurencyjnie znajduje rozmiar stogu siana z igłą o określonych współrzędnych i jest wywoływany dla każdej igły w stogu siana.

obolały
źródło