Os países possuem uma série de territórios em um mundo 1D. Cada país é identificado exclusivamente por um número. A propriedade dos territórios pode ser representada por uma lista da seguinte maneira:

1 1 2 2 1 3 3 2 4

Definimos os territórios de edgemost de um país como os dois territórios mais próximos de uma das extremidades. Se a lista acima não tiver sido indexada em zero, 1os territórios de edgemost do país ocorrerão na posição 0e 4.

Um país circunda outro se a sub-lista entre seus dois territórios edgemost contiver todos os territórios de outro país. No exemplo acima, a 2sub- lista entre os territórios de edgemost do país é:

2 2 1 3 3 2

E vemos que todos os territórios do país 3estão entre os territórios edgemost do país 2, então país 2circunda o país 3.

Um país com apenas um elemento nunca cercará outro.

Desafio

Dê uma lista de inteiros como entrada (em qualquer formato) e saída de um truthy valor se qualquer país é cercado por uma outra, e uma Falsas valor de outra forma.

Você pode assumir que a lista de entrada não é vazia, contém apenas números inteiros positivos e não ignora nenhum número: por exemplo, 1 2 1 5seria uma entrada inválida.

Casos de teste

+----------------------+--------+
|        Input         | Output |
+----------------------+--------+
| 1                    | False  |
| 2 1 3 2              | True   |
| 2 1 2 1 2            | True   |
| 1 2 3 1 2 3          | False  |
| 1 3 1 2 2 3 2 3      | True   |
| 1 2 2 1 3 2 3 3 4    | False  |
| 1 2 3 4 5 6 7 8 9 10 | False  |
+----------------------+--------+

Pitão, 7 bytes

n{Q_{_Q

Execute o código nos casos de teste.

n      Check whether the following are not equal:
 {Q     The unique elements in order of first appearance
 _{_Q   The unique elements in order of last appearance
         (done by reversing, taking unique elts, then reversing again)

A única maneira de evitar o entorno é que os territórios mais à esquerda dos países sejam classificados na mesma ordem que seus territórios mais à direita. Se dois países são trocados nessa ordem, um tem um território mais à esquerda e mais à direita do que o outro, e o rodeia.

Para obter os países únicos em ordem do território mais à esquerda, simplesmente desduplicamos, o que preserva essa ordem. O mesmo é feito para o território mais à direita revertendo, desduplicando e revertendo novamente. Se estes dão resultados diferentes, então um país está cercado.

Retina , 61 60 bytes

Muito mais tempo do que eu gostaria ...

(\b(\d+)\b.* (?!\2 )(\d+) .*\b\2\b)(?!.* \3\b)(?<!\b\3 .*\1)

Imprime o número de países que cercam pelo menos um outro país.

Experimente online.

É uma implementação muito direta das especificações: procuramos o padrão A...B...Atal que Bapareça nem antes nem depois da partida.

Python, 64 bytes

lambda l,S=sorted:S(l,key=l.index)!=S(l,key=l[::-1].index)[::-1]

A única maneira de evitar o entorno é que os territórios mais à esquerda dos países sejam classificados na mesma ordem que seus territórios mais à direita. Se dois países são trocados nessa ordem, um tem um território mais à esquerda e mais à direita do que o outro, e o rodeia.

A função verifica se a classificação dos territórios por aparência mais à esquerda e aparência mais à direita fornece os mesmos resultados. Infelizmente, as listas Python não são rindexanálogas rfind; portanto, revertemos a lista e, em seguida, revertemos a saída classificada.

Mesmo comprimento (64) com função auxiliar:

g=lambda l:sorted(l,key=l.index)
lambda l:g(l)[::-1]!=g(l[::-1])

C #, 113 bytes

public bool V(int[] n){var u1=n.Distinct();var u2=n.Reverse().Distinct().Reverse();return !u1.SequenceEqual(u2);}

Ungolfed:

public bool ContainsSurroundedCountry(int[] numbers)
{
    int[] uniqueLeftmost = numbers.Distinct().ToArray();
    int[] uniqueRightmost = numbers.Reverse().Distinct().Reverse().ToArray();

    return !uniqueLeftmost.SequenceEqual(uniqueRightmost);
}

Usando uma LINQabordagem concisa .

CJam ( 14 13 bytes)

{__&\W%_&W%#}

Demonstração online

Agradecemos a Martin Büttner pela economia de um char.

Japonês, 12 bytes

Uâ ¬¦Uw â ¬w

Experimente online!

Agradecemos ao @xnor por descobrir o algoritmo. A matriz de entrada é automaticamente armazenada U, âé uniqify, wé reversa e ¦é !=. ¬junta-se à string vazia ( [1,2,3] => "123"); isso é necessário porque a comparsa do JavaScript conta duas matrizes como não iguais, a menos que sejam o mesmo objeto. Por exemplo (código JS, não Japt):

var a = [1], b = [1]; alert(a==b); // false
var a = [1], b = a;   alert(a==b); // true

Se não fosse esse o caso, poderíamos remover dois bytes simplesmente não unindo cada matriz:

Uâ ¦Uw â w

ES6, 76 75 65 64 bytes

 a=>(f=r=>a.filter((x,i)=>a.indexOf(x,r&&i+1)==(r|i))+a)()!=f(-1)

Porta direta das respostas do @ xnor.

Editar: salvou 1 byte substituindo a.lastIndexOf(x)==ipor a.indexOf(x,i+1)<0.

Editar: salvou 10 bytes graças a @ user81655.

Editar: salvou 1 byte substituindo r||ipor r|i.

05AB1E , 4 bytes

ÙIÚÊ

Experimente online ou verifique todos os casos de teste .

Porto de @xnor resposta Pyth 's .

Explicação:

Ù       # Uniquified
 IÚ     # Reversed uniquified on the input again
   Ê    # Check if the two lists are not equal

Java, 281 caracteres

class K{public static void main(String[]a){System.out.println(!k(a[0]).equals(new StringBuffer(k(new StringBuffer(a[0]).reverse().toString())).reverse().toString()));}static String k(String k){for(char i=49;i<58;i++){k=k.replaceFirst(""+i,""+(i-9)).replaceAll(""+i,"");}return k;}}

Python 3, 90 bytes

Esta função que recebe a entrada como uma lista Python. Infelizmente, as listas Python não suportam diretamente a pesquisa a partir do final, como fazem as strings rindex(), mas tudo bem.

def t(c):i,I=c.index,c[::-1].index;return any(i(n)<i(m)and I(n)<I(m)for m in c for n in c)