Zrób trochę kontynent

11

Wyobraźmy sobie, że mamy macierz bitów (która zawiera co najmniej jeden 1):

0 1 0 1 1 0 1 0 0 1 0
0 1 0 1 0 0 1 0 1 1 0
0 0 1 0 1 1 0 1 0 1 0
1 1 0 0 1 0 0 1 1 0 1
0 0 0 1 0 1 1 0 0 1 0

Chcemy ustawić niektóre bity w tej macierzy w taki sposób, aby tworzyły ciągłą kroplę 1s, w której każdy 1jest bezpośrednio lub pośrednio połączony ze sobą 1poprzez ruch ortogonalny:

0 1 1 1 1 1 1 0 0 1 0
0 1 0 1 0 0 1 0 1 1 0
0 1 1 0 1 1 1 1 0 1 0
1 1 0 0 1 0 0 1 1 1 1
0 0 0 1 1 1 1 0 0 1 0

(Możesz to lepiej zobaczyć, wyszukując za 1pomocą funkcji „znajdź” w przeglądarce).

Jednak chcemy również zminimalizować liczbę bitów, które ustawiliśmy.

Zadanie

Biorąc pod uwagę macierz (lub tablicę tablic) bitów lub boolanów, zwróć minimalną liczbę bitów, które należy ustawić, aby utworzyć ciągły kontynent 1s. Powinno być możliwe przechodzenie z jednego zestawu bitów w macierzy do drugiego poprzez przemieszczanie się tylko w kierunku ortogonalnym do innych ustawionych bitów.

To jest , więc wygrywa najkrótsze prawidłowe zgłoszenie (mierzone w bajtach).

Przypadki testowe

0 1 0 1 1 0 1 0 0 1 0
0 1 0 1 0 0 1 0 1 1 0
0 0 1 0 1 1 0 1 0 1 0
1 1 0 0 1 0 0 1 1 0 1
0 0 0 1 0 1 1 0 0 1 0
=> 6

1 0 0 0 0 0 1 0 0
1 1 0 0 1 1 1 0 0
1 1 1 0 1 1 1 1 1
0 1 0 0 0 0 0 0 0
0 0 0 0 0 1 1 1 1
0 1 0 0 0 0 1 1 0
1 0 0 0 0 0 1 0 0
=> 4

0 0 0 1 1 1 0 1 1
0 0 1 0 0 0 0 1 0
0 0 1 1 1 1 1 1 0
1 1 0 0 1 1 0 0 0
0 0 1 1 1 0 0 1 1
0 1 1 1 0 0 0 0 0
1 1 1 0 0 1 1 1 0
1 1 1 0 1 1 0 1 1
0 0 0 0 1 0 0 0 1
1 1 0 0 1 1 0 1 1
0 0 0 0 0 0 0 1 0
0 1 1 1 1 0 0 0 0
0 0 0 1 1 0 0 0 1
0 1 0 0 1 0 1 1 0
0 1 1 1 0 0 0 0 1
=> 8

1 1 1 1 1
1 1 1 1 1
1 1 1 1 1
1 1 1 1 1
=> 0
Esolanging Fruit
źródło
1
To wymaga trochę więcej wyjaśnienia. Co to jest „ciągły obiekt blob” w matrycy?
NoOneIsHere
11
Ponieważ wiadomo, że jest to trudny NP , nie jest to dobry problem dla najszybszego algorytmu .
Peter Taylor
1
@Peter Taylor i esolangingfruit NP-Hardness
FantaC
1
W świetle komentarzy Petera Taylora i HyperNeutrino oraz faktu, że pytanie obecnie nie ma odpowiedzi, zmieniam metodę punktacji na kodowanie .
Esolanging Fruit,
1
Co powinniśmy zrobić, jeśli nie ma 1w matrycy?
Colera Su,

Odpowiedzi:

1

C (gcc), 308 306 bajtów

Funkcja fodbiera (height, width, flattened array, pointer to ans)i zwraca odpowiedź wskaźnikiem.

Jeśli nie ma 1matrycy, zwróci 0.

#define v A[i]
N,M,K,R,C,T,i,*A;s(x,y){i=x*M+y;if(!(x<0|y<0|x>=N|y>=M|v^1))v=2,s(x,y+1),s(x,y-1),s(x+1,y),s(x-1,y);}g(i){if(C<R){if(i^K){g(i+1);if(!v)C+=v=1,g(i+1),v=0,C--;}else{T=1;for(i=0;i<K&&!v;i++);s(i/M,i%M);for(i=0;i<K;i++)T&=v^1,v=!!v;if(T)R=C;}}}f(n,m,a,b)int*a,*b;{K=R=(N=n)*(M=m),A=a;g(0);*b=R;}

Wypróbuj online!

Nie golfowany:

N,M,R,C,T,i,*A; // height, width, result, recursion depth

s(x,y)
{ // depth first search: replace all 1 in the same connected component with 2
    i=x*M+y;
    if(!(x<0|y<0|x>=N|y>=M|A[i]^1)) { // check if out of boundary
        A[i]=2;
        s(x, y+1),s(x, y-1),s(x+1, y),s(x-1, y);
    }
}

g(i)
{ // enumerate all posible solutions
    if(C<R) {
        if(i!=N*M) {
            g(i+1);      // nothing change for this entry
            if (!A[i]) { // set the entry to 1
                C++, A[i]=1;
                g(i+1);
                C--, A[i]=0;
            }
        }
        else {
            T=1;
            for (i=0; i<N*M && !A[i]; i++); // find first non-zero entry
            s(i/M, i%M);     // replace the connected component
            for (i=0; i<N*M; i++) {
                T&=A[i]!=1;   // check if no other components
                A[i]=!!A[i]; // change 2s back to 1
            }
            if (T) R=C;      // update answer
        }
    }
}

f(n,m,a,b)int*a,*b;{
    R=(N=n)*(M=m), A=a;
    g(0);
    *b=R;
}
Colera Su
źródło
0

Python 2 , 611 bajtów

Pełny program, który pobiera listę list na podstawie danych wprowadzonych przez użytkownika. Funkcje Ii dpolicz liczbę wysp w tablicy. Pętla for na końcu wylicza wszystkie możliwości zmiany 0s na 1s, a jeśli pozostała jedna wyspa, zapisuje liczbę 1s dodanych do listy C. Minimum tej listy to minimalna liczba bitów typu flip wymagana do połączenia dowolnych wysp. Jest to bardzo wolny algorytm, więc nie uruchamia przypadków testowych podanych poniżej 60 lat (nie próbowałem dłużej), ale wypróbowałem kilka mniejszych (~ 5x5) przypadków testowych i wydaje się, że działa poprawnie. Z tej strony mam algorytm zliczania wysp .

from itertools import*
def d(g,i,j,v):
 v[i][j],R,C=1,[-1,1,0,0],[0,0,-1,1]
 for k in range(4):
	if len(g)>i+R[k]>=0<=j+C[k]<len(g[0]):
	 if v[i+R[k]][j+C[k]]<1and g[i+R[k]][j+C[k]]:v=d(g,i+R[k],j+C[k],v)
 return v
def I(g):
 w=len(g[0])
 v,c=[w*[0]for r in g],0
 for i in range(len(g)*w):
	if v[i/w][i%w]<1and g[i/w][i%w]>0:v=d(g,i/w,i%w,v);c+=1
 return c           
g=input()
C=[]
for p in [list(t)for t in product([0,1],repeat=sum(r.count(0)for r in g))]:
 h,G,x=0,[r[:]for r in g],len(g[0])
 for i in range(x*len(G)):
	if G[i/x][i%x]<1:h+=p[0];G[i/x][i%x]=p[0];del p[0]
 if I(G)<2:
	C.append(h)
print min(C)

Wypróbuj online!

Wersja wstępnie golfowana, zanim zoptymalizowałem kilka rzeczy:

from itertools import*
def d(g,i,j,v):
    v[i][j]=1
    R=[-1,1,0,0]
    C=[0,0,-1,1]
    for k in range(4):
        if len(g)>i+R[k]>=0<=j+C[k]<len(g[0]):
            if v[i+R[k]][j+C[k]]<1:
                if g[i+R[k]][j+C[k]]:
                    v=d(g,i+R[k],j+C[k],v)
    return v
def I(g):
    w=len(g[0])
    v=[[0]*w for r in g]
    c=0
    for i in range(len(g)):
        for j in range(w):
            if v[i][j]<1and g[i][j]>0:
                v=d(g,i,j,v)
                c+=1
    return c           
g=input()
z=sum(r.count(0)for r in g)
f=[list(t)for t in product('01',repeat=z)]
C=[]
for p in f:
    h=0
    G=[r[:]for r in g]
    x=len(G[0])
    for i in range(x*len(G)):
        exec('h+=int(p[0]);G[i/x][i%x]=int(p[0]);del p[0]'*(G[i/x][i%x]<1))
    if I(G)<2:
        C.append(h)
print min(C)
dylnan
źródło