Entrada:

Una lista / vector no vacío donde cada elemento contiene un valor / carácter, que indica si contará hacia arriba o hacia abajo . Usaré 1y -1, pero puedes elegir lo que quieras. Solo puede usar dos valores, no puede usar 1,2,3...y -1,-2,-3..., para arriba y abajo respectivamente.

Desafío:

Vamos a usar los números de la serie geométrica 1, 2, 4, 8, 16, 32 ... . Cada vez que comience a contar hacia arriba o hacia abajo, contará en incrementos de 1 , luego 2 , luego 4 y así sucesivamente. Si cambia y comienza a contar de otra manera, restará 1 , luego 2 , luego 4 y así sucesivamente. La salida será el número al que llegue al final.

Ejemplos:

En el ejemplo a continuación, la primera línea es la entrada, la segunda línea son los números que está contando hacia arriba / hacia abajo, la tercera línea es la suma acumulativa y la última línea es la salida.

Ejemplo 1:

1   1   1   1   1   1   1   1   1   1   
1   2   4   8   16  32  64  128 256 512 
1   3   7   15  31  63  127 255 511 1023
1023

Ejemplo 2

1   1   1   1   1   1   -1  -1  -1  -1  1   1   1
1   2   4   8   16  32  -1  -2  -4  -8  1   2   4
1   3   7   15  31  63  62  60  56  48  49  51  55
55

Como puede ver, el primero 1o -1"restablece" el valor que estamos contando, y las secuencias consecutivas de 1o -1significa duplicar el valor.

Ejemplo 3

-1  -1  1   1   -1  -1  -1
-1  -2  1   2   -1  -2  -4
-1  -3  -2  0   -1  -3  -7
-7

Algunos casos de prueba adicionales para dar cuenta de algunos casos de esquina potenciales.

La entrada está en la primera línea. La salida está en el segundo.

1
1
-------    
-1
-1
-------
-1   1  -1   1  -1   1  -1   1  -1   1  -1   1
0

Este es el código de golf, por lo que gana la presentación más corta en cada idioma.

code-golf number sequence

— Stewie Griffin
fuente

19

Casco , 3 bytes

ṁḋg

Pruébalo en línea!

Explicación

ṁḋg
  g  Group equal adjacent elements,
ṁ    take sum of
 ḋ   base-2 decoding of each group.

— Zgarb
fuente

6

MATL , 6 bytes

Y'Wq*s

Pruébalo en línea! O verificar todos los casos de prueba .

Explicación

Considere la entrada [1 1 1 1 1 1 -1 -1 -1 -1 1 1 1].

     % Implicit input
     % STACK: [1 1 1 1 1 1 -1 -1 -1 -1 1 1 1]
Y'   % Run-length encoding
     % STACK: [1 -1 1], [6 4 3]
W    % Exponentiation with base 2, element-wise
     % STACK: [1 -1 1], [64 16 8]
q    % Subtract 1
     % STACK: [1 -1 1], [63 15 7]
*    % Multiply, element-wise
     % STACK: [63 -15 7]
s    % sum of array
     % STACK: 55
     % Implicit display

— Luis Mendo
fuente

6

Japt , 8 6 bytes

-2 bytes gracias a @ETHproductions

ò¦ xì2

Pruébalo en línea!

Explicación

Entrada implícita: [1, 1, 1, -1, -1, -1, -1, 1, 1]

ò¦

Partición de matriz de entrada ( ò) entre diferentes ¦elementos ( ):
[[1, 1, 1], [-1, -1, -1, -1], [1, 1]]

ì2

Asigne cada partición a sí misma analizada como una matriz de 2dígitos base ( ì):[7, -15, 3]

Obtenga la suma ( x) de la matriz resultante:-5

— Justin Mariner
fuente

Buena técnica Creo que puede cambiar ®ì2Ãxa xì2para guardar dos bytes.

— ETHproductions

@ETHproductions Hombre, has estado en todas mis publicaciones. ¡Gracias de nuevo!

— Justin Mariner

5

Cubix , 65 bytes

W(?\q.p)w.;0.w;/0>I!U-unP(nwUs;q\^q:;^!u?P(w!u+w.;;>2p!u/@Os..sr\

Pruébalo en línea!

        W ( ? \
        q . p )
        w . ; 0
        . w ; /
0 > I ! U - u n P ( n w U s ; q
\ ^ q : ; ^ ! u ? P ( w ! u + w
. ; ; > 2 p ! u / @ O s . . s r
\ . . . . . . . . . . . . . . .
        . . . .
        . . . .
        . . . .
        . . . .

Míralo correr

Como una breve explicación de esto:

Lea en cada entero (1 o -1) y compárelo con el anterior. Si:
- lo mismo empujarlo al fondo como el inicio de un contador
- de lo contrario, coloque el contador en la parte superior e increméntelo / decremente según corresponda.
Una vez que haya finalizado la entrada, coloque cada contador en la parte superior y maneje los negativos haciendo 2 ^ contador - 1
Suma los resultados y resultados

— MickyT
fuente

4

JavaScript (ES6), 38 bytes

a=>a.map(e=>r+=d=d*e>0?d+d:e,r=d=0)&&r

— Neil
fuente

3

R , 32 bytes

sum((2^(R=rle(scan()))$l-1)*R$v)

Pruébalo en línea!

Este es el mismo método que algunos otros aquí.

Con la entrada de -1 -1 1 1 -1 -1 -1

Realice una codificación de longitud de ejecución en la entrada. Resultados con longitudes 2, 2, 3y valores-1, 1, -1
Haz 2 al poder de longitudes - 1. Resultados en 3, 3, 7
Multiplicar por los valores RLE dando -3, 3, -7
Devuelve la suma -7

— MickyT
fuente

3

Python 3 , 57 56 bytes

-1 byte gracias a @notjagan

f=lambda a,*s,m=1:m*a+(s>()and f(*s,m=(m*2)**(a==s[0])))

Pruébalo en línea!

— ovs
fuente

-1 byte con esto o esto .

— notjagan

Eso s>()me llevó un segundo. Eso es realmente inteligente.

— Morgan Thrapp

2

Jalea , 4 bytes

ŒgḄS

Pruébalo en línea!

— Monja permeable
fuente

2

C ++ 14, 58 bytes

[](auto v,int&s){int p=s=0;for(auto x:v)s+=p=x*p<1?x:2*p;}

Toma entrada a través del vargumento ( std::vectoro cualquier contenedor iterable), salidas al sargumento (por referencia). Cada elemento de vdebe ser 1o -1.

Ejemplo de uso y casos de prueba.

— vaultah
fuente

2

Brachylog , 13 bytes

ḅ⟨{ȧᵐ~ḃ}×h⟩ᵐ+

Pruébalo en línea!

Usos de Brachylog _ lugar de -.

Explicación:

?ḅ⟨{ȧᵐ~ḃ}×h⟩ᵐ+. Predicate (implicit ?.)
?               The input
 ḅ              A list where its elements' elements are equal, and when concatenated is ?
            ᵐ   The result of mapping this predicate over ?
  ⟨        ⟩      The result of forking two predicates over ? with a third
   {    }           The result of this predicate on ?
     ᵐ                The result of mapping this predicate over ?
    ȧ                   The absolute value of ?
      ~               An input where the result of this predicate over it is ?
       ḃ                A list that represents the digits of ? in base I (default 2)
          h         An object that is the first element of ?
         ×          A number that is the product of ?
             +  A number that is the sum of ?
              . The output

— Erik el Outgolfer
fuente

1

Python, 76 72 bytes

f=lambda s,k=1:len(s)and(f(s,s[0])if s[0]*abs(k)/k-1else k+f(s[1:],2*k))

Pruébalo en línea!

— Uriel
fuente

1

Pyth , 12 bytes

sm*edt^2hdr8

Pruébalo en línea!

— notjagan
fuente

1

PHP, 51 bytes

while($d=$argv[++$i])$s+=$x=$d*$x>0?2*$x:$d;echo$s;

Ejecutar -no probarlo en línea .

— Titus
fuente

1

CJam (13 bytes)

{e`{(*2b}%1b}

Conjunto de pruebas en línea . Este es un bloque anónimo (función) que toma una matriz de entradas en la pila y deja un int en la pila. La última prueba muestra que maneja una matriz vacía correctamente, dando 0.

El enfoque es la codificación directa de la longitud de ejecución seguida de una decodificación de longitud de ejecución manual de cada ejecución y conversión de base. Usando el decodificador incorporado para la longitud de ejecución obtengo un byte más con {e`1/:e~2fb1b}o {e`{ae~2b}%1b}.

— Peter Taylor
fuente

1

05AB1E , 6 bytes

γε2β}O

Pruébalo en línea!

— Erik el Outgolfer
fuente

Ahhh ... conversión de Base-2 ... y pensé que estaba siendo linda con el ascensor γε¬sƶÄ<o*}OO

— Magic Octopus Urn

1

Haskell, 54 53 bytes

k#(a:b:c)=k+last(b:[k*2|a==b])#(b:c)
k#_=k
(#)=<<head

Pruébalo en línea!

Una recursión simple que dobla el acumulador ko lo restablece a 1/ -1y agrega los valores de cada paso.

— nimi
fuente

0

Mathematica, 60 bytes

Tr[Last@*Accumulate/@(#[[1]]2^(Range@Tr[1^#]-1)&/@Split@#)]&

— J42161217
fuente

0

Mathematica, 25 bytes

Tr[Fold[#+##&]/@Split@#]&

— ngenisis
fuente

0

Java, 91 bytes

int f(int[]a){int s=0,r=0,i=-1;while(++i<a.length)r+=s=s!=0&s>0==a[i]>0?2*s:a[i];return r;}

— RCB
fuente

0

Pyth, 11 bytes

s.b*t^2NYr8

Pruébalo en línea

Cómo funciona

         r8    run-length encode input
 .b            map (N, Y) ↦
     ^2N           2^N
    t              minus 1
   *    Y          times Y
s              sum

— Anders Kaseorg
fuente

Contando hacia arriba y hacia abajo mientras duplica los incrementos

Entrada:

Desafío:

Ejemplos:

Casco , 3 bytes

Explicación

MATL , 6 bytes

Explicación

Japt , 8 6 bytes

Explicación

Cubix , 65 bytes

JavaScript (ES6), 38 bytes

R , 32 bytes

Python 3 , 57 56 bytes

Jalea , 4 bytes

C ++ 14, 58 bytes

Brachylog , 13 bytes

Python, 76 72 bytes

Pyth , 12 bytes

PHP, 51 bytes

CJam (13 bytes)

05AB1E , 6 bytes

Haskell, 54 53 bytes

Mathematica, 60 bytes

Mathematica, 25 bytes

Java, 91 bytes

Pyth, 11 bytes

Cómo funciona