Para encontrar uma agulha no palheiro, você precisa encontrar o maior palheiro contíguo que contém exatamente uma agulha . Observe que você não pode conectar células nas diagonais, apenas esquerda / direita / cima / baixo.

Entrada

Uma matriz (ou várias linhas de entrada do usuário, sua escolha) de caracteres 'N'(agulhas) e '#'(feno). A entrada contém apenas esses dois caracteres e deve conter pelo menos um de cada. Por exemplo:

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

Resultado

O tamanho do maior palheiro válido possível. No nosso exemplo, produziríamos 11 (existem 11 pedaços de feno e uma agulha).

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

Isso é código-golfe , então o código mais curto vence. Aplicam-se restrições de brecha padrão.

Casos de teste

Entrada à esquerda, possível palheiro máximo à direita

Caso 1: 4

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

Caso 2: 7

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

Caso 3: 10

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

Caso 4: 10

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

Caso 5: 1

NN#NN        
NNNNN         
#NNN#   #N    
NN#NN        

JavaScript (ES6), 152 bytes

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

Explicação

Para cada agulha na entrada, defina a agulha como uma parte do palheiro (representada pela configuração para um número diferente de zero) e verifique continuamente as células do feno. Se o feno contiver uma parte adjacente da pilha de feno, ele também será definido como parte do palheiro e aumentará o tamanho da pilha de feno. Produz o resultado mais alto.

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>

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}

Esta é uma função anônima que recebe a entrada como uma matriz de matrizes. Uso:

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

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

O proc nomeado sencontra recursivamente o tamanho do palheiro com agulha em coordenadas específicas e é chamado em cada agulha no palheiro.