Dada uma lista não classificada de números inteiros positivos únicos, produza a lista mais curta dos intervalos mais longos possíveis de números inteiros seqüenciais.

ENTRADA

• Uma lista não classificada de números inteiros positivos únicos
  • por exemplo 9 13 3 11 8 4 10 15
• A entrada pode ser obtida de qualquer um dos seguintes:
  • stdin
  • argumentos da linha de comando
  • argumentos de função

RESULTADO

• Uma lista ordenada de intervalos ou valores individuais impressos em uma linha para stdout ou a saída semelhante mais próxima do seu idioma.
  • Se dois ou mais números inteiros sequenciais (sequenciais por valor, não por localização na lista) estiverem presentes, eles serão indicados como um intervalo inclusivo usando -, por exemplo, 8-11
  • Todos os outros números inteiros são simplesmente impressos sem outra notação
  • Um único espaço delimitará a saída
• Os números que não estão presentes na entrada não devem estar na saída, por exemplo, 3 5 6não podem ser encurtados 3-6porque 4não estão presentes

EXEMPLOS

Bem sucedido:

 IN> 9 13 3 11 8 4 10 15 6
OUT> 3-4 6 8-11 13 15

 IN> 11 10 6 9 13 8 3 4 15
OUT> 3-4 6 8-11 13 15

 IN> 5 8 3 2 6 4 7 1
OUT> 1-8

 IN> 5 3 7 1 9
OUT> 1 3 5 7 9

Errado:

 IN> 9 13 3 11 8 4 10 15
OUT> 3-15

O intervalo contém valores que não estão na entrada

 IN> 9 13 3 11 8 4 10 15
OUT> 3 4 8 9 10 11 13 15

Todos os valores sequenciais devem ser representados como um intervalo

 IN> 9 13 3 11 8 4 10 15
OUT> 3-4 8-9 10-11 13 15

Alcance dividido 8-9e 10-11deve ser8-11

 IN> 9 13 3 11 8 4 10 15
OUT> 8-9 13 10-11 3-4 15

Saída não solicitada corretamente

REGRAS

• As brechas padrão não são permitidas
• Se seu idioma tem uma função para fazer isso, não é permitido
• Você pode escrever um programa completo ou uma função
• espaço em branco à direita não importa

PONTUAÇÃO

• Menos bytes ganhos

Python 2, 123 120 bytes

N=sorted(map(int,raw_input().split(' ')));print(''.join((''if n+1in N else'-'+`n`)if n-1in N else' '+`n`for n in N)[1:])

Se a entrada puder ser uma lista como argumento de função, então (obrigado mbomb007 e xnor pelos condicionais)

93 90 81 bytes

def f(N):print''.join((' '+`n`,`-n`*-~-(n+1in N))[n-1in N]for n in sorted(N))[1:]

(77 bytes se o espaço em branco inicial for aceitável - solte o final [1:])

JavaScript (ES6): 171 154 140 137 bytes

Obrigado edc65 e vihan1086 pelas dicas! [...n]é muito bom, mas não funciona nesses casos devido a números com vários dígitos.

f=n=>{s=e=o='';n.split` `.map(Number).sort((a,b)=>a-b).map(v=>{s=s||v;if(e&&v>e+1){o+=`${s<e?s+'-'+e:s} `;s=v}e=v});return o+(s<e?s+'-'+e:e)}

Variante ES5, 198 184 183 183 174 bytes

f=function(n){s=e=o='';n.split(' ').map(Number).sort(function(a,b){return a-b}).map(function(v){s=s||v;if(e&&v>e+1){o+=(s<e?s+'-'+e:s)+' ';s=v}e=v});return o+(s<e?s+'-'+e:e)}

f = function (n) {
    s = e = 0, o = '';
    n.split(' ').map(Number).sort(function (a, b) {
        return a - b
    }).map(function (v) {
        s = s || v;
        if (e && v > e + 1) {
            o += (s < e ? s + '-' + e : s) + ' ';
            s = v
        }
        e = v
    });
    return o + (s < e ? s + '-' + e : e)
}

// Demonstration
document.body.innerHTML = f('1 2');
document.body.innerHTML += '<p>' + f('9 13 3 11 8 4 10 15 6');
document.body.innerHTML += '<p>' + f('11 10 6 9 13 8 3 4 15');
document.body.innerHTML += '<p>' + f('5 8 3 2 6 4 7 1');
document.body.innerHTML += '<p>' + f('5 3 7 1 9');

Ruby, 86 84 bytes

s=->*a{puts a.sort.slice_when{|i,j|i+1!=j}.map{|e|e.size<2?e:[e[0],e[-1]]*"-"}*" "}

# demo
s[9, 13, 3, 11, 8, 4, 10, 15, 6]
# => 3-4 6 8-11 13 15

Esta é uma versão ligeiramente modificada de um exemplo nos documentos para slice_when .

CJam, 35 bytes

l~${__0=f-ee::=0+0#/((oW>Wf*S+oe_}h

Experimente on-line no intérprete CJam .

Como funciona

l~$     e# Read a line from STDIN, evaluate it and sort the result.
{       e# Do:
  _     e#   Push a copy of the array.
  _0=f- e#   Subtract the first element from all array elements.
  ee    e#   Enumerate the differences: [0 1 4] -> [[0 0] [1 1] [2 4]]
  ::=   e#   Vectorized quality: [i j] -> (i == j)
  0+    e#   Append a zero.
  0#    e#   Push the first index of 0.
  /     e#   Split the array into chunks of that size.
  (     e#   Shift out the first chunk.
  (o    e#   Print its first element.
  W>    e#   Discard all remaining elements (if any) except the last.
  Wf*   e#   Multiply all elements of the remainder by -1.
  S+o   e#   Append a space and print.
  e_    e#   Flatten the rest of the array.
}h      e# Repeat while the array is non-empty.

Ruby, 70 bytes

Problemas como esses tendem a me fazer verificar a API do Ruby quanto a métodos adequados, e hoje descobri uma nova: Array#slice_whenintroduzida recentemente no Ruby v2.2 e aparentemente destinada a essa situação exata :)

f=->a{puts a.sort.slice_when{|i,j|j-i>1}.map{|x|x.minmax.uniq*?-}*' '}

Depois de classificar e fatiar adequadamente a matriz, ela pega cada sub-matriz e cria uma sequência a partir do elemento mais alto e mais baixo e, em seguida, une toda essa matriz em uma sequência.

Exemplo:

f.call [9,13,3,11,8,4,10,15,6] impressões 3-4 6 8-11 13 15

SWI-Prolog, 165 162 159 bytes

b(Z,C,[D|E]):-Z=[A|B],(A=:=D+1,(B=[],put(45),print(A);b(B,C,[A,D|E]));(E=[],tab(1),print(A);writef('-%t %t',[D,A])),b(B,A,[A]));!.
a(A):-sort(A,B),b(B,_,[-1]).

Muito ruim, mas novamente Prolog é uma péssima linguagem no golfe

Exemplo: a([9,13,3,11,8,4,10,15,6]).saídas3-4 6 8-11 13 15

CJam, 38 33 bytes

Nova versão, usando idéias e fragmentos de código sugeridos por @Dennis:

l~$_,,.-e`{~T+\_T+:T;(_2$+W*Q?S}/

Experimente online

O formato de entrada é uma matriz CJam entre colchetes.

A idéia básica aqui é que eu subtraia uma sequência monotônica da sequência de entrada classificada primeiro:

3  4  8  9 10 11 13 15
0  1  2  3  4  5  6  7  (-)
----------------------
3  3  6  6  6  6  7  8

Nessa diferença, os valores que fazem parte do mesmo intervalo têm o mesmo valor. A aplicação do operador CJam RLE a essa diferença enumera diretamente os intervalos.

Os valores sequenciais subtraídos precisam ser adicionados novamente durante a saída. Não estou totalmente feliz com como isso é feito no meu código. Eu suspeito que eu poderia salvar alguns bytes com uma maneira mais elegante de lidar com isso.

Para gerar a saída dos intervalos, isso usa a ideia de Dennis de gerar um número negativo para o valor final, que cuida da produção de a -, e também simplifica a lógica, porque apenas um valor precisa ser adicionado / omitido, dependendo do tamanho do intervalo .

Explicação:

l~    Get input.
$     Sort it.
_,,   Create monotonic sequence of same length.
.-    Calculate vector difference between the two.
e`    Calculate RLE of difference vector.
{     Loop over entries in RLE.
  ~     Unpack the RLE entry, now have length/value on stack.
  T+    Add position to get original value for start of interval.
  \     Bring length of interval to top of stack.
  _T+:T;  Add length of interval to variable T, which tracks position.
  (     Decrement interval length.
  _     Copy it, we need it once for calculating end value, once for ternary if condition.
  2$    Copy interval start value to top...
  +     ... and add interval length - 1 to get end value.
  W*    Negate end value.
  Q?    Output end value if interval length was > 1, empty string otherwise.
  S     Add a space.
}%    End loop.

CoffeeScript, 178 161 bytes

Assim como minha resposta JavaScript. Preciso descobrir se o uso de compreensão resultará em código mais curto.

f=(n)->s=e=o='';n.split(' ').map(Number).sort((a,b)->a-b).map((v)->s=s||v;(o+=s+(if s<e then'-'+e else'')+' ';s=v)if(e&&v>e+1);e=v);o+(if s<e then s+'-'else'')+e

Original:

f=(n)->o='';s=e=0;n.split(' ').map(Number).sort((a,b)->a-b).forEach((v,i)->if!i then s=v else(o+=s+(if s<e then'-'+e else'')+' ';s=v)if(v!=e+1);e=v);o+(if s<e then s+'-'else'')+e

Python 2, 126 122 121 Bytes

Eu sei que isso pode ficar mais curto, só não sei onde. Requer entrada no formulário [#, #, #, #, ..., #].

l=sorted(input());s=`l[0]`;c=0;x=1
while x<len(l):y,z=l[x],l[x-1];s+=(('-'+`z`)*c+' '+`y`)*(y-z>1);c=(y-z<2);x+=1
print s

Java, 191 bytes

void f(int[]a){java.util.Arrays.sort(a);for(int b=a.length,c=b-1,i=0,j=a[0],l=j;++i<b;){if(a[i]!=++j||i==c){System.out.print((l+1==j?l+(i==c?" "+a[c]:""):l+"-"+(i==c?j:j-1))+" ");l=j=a[i];}}}

Verifica os intervalos e os imprime de acordo. Infelizmente, tive que fazer um caso especial para o último elemento da matriz, pois o programa terminaria sem imprimir o último número ou intervalo.

Java, 171 162 bytes

String s(int[] n){Arrays.sort(n);int p=0,b=0;String r="",d="";for(int c:n){if(c==++p)b=1;else{if(b==1){r+="-"+--p+d+c;p=c;b=0;}else{r+=d+c;p=c;}d=" ";}}return r;}

Recebe entrada como uma matriz int, retorna a saída como uma lista de String separada por espaço