To wątek złodziei. Wątek gliniarzy idzie tutaj .

W wątku gliniarzy zadaniem było napisanie programu / funkcji, która przyjmuje dodatnią (lub nieujemną) liczbę całkowitą i zwraca / zwraca inną liczbę (niekoniecznie całkowitą). Zadaniem rabusiów jest rozszyfrowanie kodu, którego gliniarze użyli do wygenerowania tego wyniku.

Pęknięty kod nie musi być identyczny, o ile ma taką samą długość, a wszelkie ujawnione znaki znajdują się we właściwych pozycjach. Język musi być również taki sam (numery wersji mogą być różne). Dane wyjściowe muszą oczywiście być identyczne.

W rozwiązaniu rabusia nie można używać żadnych operacji.

Zwycięzcą wątku rabusiów zostanie użytkownik, który złamał najwięcej zgłoszeń do 7 maja 2016 r. W przypadku remisu wygra użytkownik, który złamał zgłoszenia o najdłuższym połączonym kodzie.

Zgłoszenie powinno być sformatowane w następujący sposób:

Język, znaki nn (w tym link do odpowiedzi), nazwa użytkownika Cop

Kod:

function a(n)
    if n<2 then
        return n
    else
        return a(n-1) + a(n-2)
    end
end

Wynik

a(0) returns 0
a(3) returns 2

Opcjonalne wyjaśnienia i komentarze.

MATL, 5 bajtów, Luis Mendo

H5-*|

Ten kod oblicza abs((2-5)*input)tylko a(n)=3*nliczby dodatnie, czyli http://oeis.org/A008585

Sześciokąt , 7 bajtów, Adnan , A005843

?{2'*!@

lub

 ? {
2 ' *
 ! @

Wypróbuj online!

Po prostu podwaja wejście (i zakłada wejście dodatnie). Kod jest (raz) po prostu wykonywany w kolejności odczytu. Kod używa trzech krawędzi pamięci A , B , C ze wskaźnikiem pamięci rozpoczynającym się, jak pokazano:

?    Read integer from STDIN into edge A.
{    Move memory pointer forwards to edge B.
2    Set edge B to 2.
'    Move memory pointers backwards to edge C.
*    Multiply edges A and B and store result in C.
!    Print result to STDOUT.
@    Terminate program.

J, 7 bajtów, Cᴏɴᴏʀ O'Bʀɪᴇɴ

Kod

2+*:@p:

Wynik

   f =: 2+*:@p:
   f 0
6
   f 2
27

Spróbuj z J.js .

Jak to działa

Sekwencja A061725 jest zdefiniowana jako a (n) = p _n ² + 2 , gdzie P _n Jest to (n + 1) ^p liczbą pierwszą.

2+*:@p:  Monadic verb. Argument: n

    @    Atop; combine the verbs to the right and to the left, applying one after
         the other.
     p:  Compute the (n+1)th prime number.
  *:     Square it.
2+       Add 2 to the result.

05AB1E , 5 bajtów , Adnan , A001788

Læ€OO

Wypróbuj online! Wykorzystuje to alternatywną definicję podaną na stronie. Wyjaśnienie:

Læ€OO
L     range;      [1..n]
 æ    powerset;   [[], [1], ..., [1..n]]
  €O  mapped sum; [0, 1, ..., T(n)]
    O sum;        [a(n)]

JavaScript, 10 bajtów , użytkownik 81655 , A033999

Chyba mam to. Tak. Ten był naprawdę trudny. Podoba mi się to zgłoszenie, ponieważ w dużej mierze opiera się na priorytetach.

Jest to sekwencja A033999 :

a (n) = (-1) ^ n.

Źródło

t=>~t.z**t

Wyjaśnienie

Jeśli podzielisz ten kod zgodnie z pierwszeństwem operatora JavaScript , otrzymasz:

1. .(priorytet 18 ) jest oceniany jako pierwszy i t.zpowróci undefined.
2. ~(priorytet 15 ) próbuje rzutować undefined, co powoduje 0, i zwraca -1po bitowym nie.
3. **(priorytet 14 ) powróci -1 ^ t, gdzie tjest nieparzysty lub parzysty , co powoduje, że -1lub 1.

Próbny

console.log(
    (t=>~t.z**t)(0),
    (t=>~t.z**t)(1),
);

Wypróbuj przed zakupem

Przyznam nagrodę w wysokości 100 powtórzeń za to fajne zgłoszenie gliny.

Element , 7 bajtów , PhiNotPi , A000042

_'[,1`}

Uwagi: Byłem wprowadzony w błąd przez }bardzo długo. Więc pasuje również [.

Wypróbuj online!

Jak to działa:

_'[,1`}
_        main_stack.push(input());
 '       control_stack.push(main_stack.pop());
  [      Object temp = control_stack.pop();
         for(int i=0;i<temp;i++){
   ,         Object a = main_stack.pop(); //is actually zero
             main_stack.push(a.toChars()[0]);
             main_stack.push(a);
    1        main_stack.push(1);
     `       System.out.println(main_stack.pop());
      }  }

PHP, 41 bajtów , nazwa insertuserhere , A079978

echo/* does n%3=0 */$argv[1]%3<1?1:0    ;

Zwraca 1, jeśli jego argument jest wielokrotnością 3, a w przeciwnym razie 0. Niewiele więcej.

MATL , 9 bajtów, zlewka , A022844

Kod (z białym znakiem na końcu):

3x2xYP*k 

Wypróbuj online!

Znaleziono trzy pasujące skrypty, które napisałem:

Found match: A022844
info: "name": "Floor(n*Pi).",

Found match: A073934
info: "name": "Sum of terms in n-th row of triangle in A073932.",

Found match: A120068
info: "name": "Numbers n such that n-th prime + 1 is squarefree.",

Próbowałem zrobić pierwszy, który jest w zasadzie zrobiony z YP*k:

3x2x       # Push 3, delete it, push 2 and delete that too
    YP     # Push pi
      *    # Multiply by implicit input
       k   # Floor function

Jolf, 3 bajty , Easterly Irk , A001477

axx

Składa się z prostego cat ( ax), po którym następuje brak operacji . Nie jestem pewien, po co tu gliniarz.

Java, 479 bajtów , Daniel M. , A000073

Kod:

import java.util.*;
public class A{

    public static int i=0;
    public boolean b;

    static A a = new A();

    public static void main(String[] args){
        int input = Integer.parseInt(args[0]);

        LinkedList<Integer> l = new LinkedList<>();
        l.add(1);
        l.add(0);
        l.add(0);

        for(int ix = 0; ix<=input; ix++)if(ix>2){
            l.add(0,l//d
            .get(1)+l.peekFirst()+     l.get(2));
        }

        System.out.println(input<2?0:l.pop()
              +(A.i        +(/*( 5*/ 0 )));
    }
}

Jeśli przegapisz nieujawnione postacie, zostaną one zastąpione spacjami.

Rubinowy, 38 bajtów, histokrat , A008592

->o{(s="+o++o"*5).sum==03333&&eval(s)}

Może się różnić od zamierzonego rozwiązania, ponieważ znalazłem to ręcznie.

05AB1E , 4 bajty, Paul Picard , A001317

Kod:

$Fx^

Wypróbuj online!

Wyjaśnienie:

$      # Pushes 1 and input
 F     # Pops x, creates a for-loop in range(0, x)
  x    # Pops x, pushes x and 2x
   ^   # Bitwise XOR on the last two elements
       # Implicit, ends the for-loop
       # Implicit, nothing has printed so the last element is printed automatically

Sekwencja jest w zasadzie dwójkowym trójkątem Sierpińskiego:

f(0)=      1                    =1
f(1)=     1 1                   =3
f(2)=    1 0 1                  =5
f(3)=   1 1 1 1                 =15
f(4)=  1 0 0 0 1                =17

I tłumaczy się na wzór a (n) = a (n - 1) XOR (2 × a (n - 1))

Na szczęście pamiętam ten :)

SILOS , betseg , A001844

readIO
a=i
a+1
i*2
i*a
i+1
printInt i

Wypróbuj online!

Jolf, 5 znaków , Cᴏɴᴏʀ O'Bʀɪᴇɴ , A033536

Kod:

!K!8x

Wynik:

a(2) = 8
a(10) = 4738245926336

Reng v3.3 , 36 bajtów , Cᴏɴᴏʀ O'Bʀɪᴇɴ , A005449

iv:#+##->>)2%æ~¡#~
#>:3*1+*^##</div>

Wynik

a(1) = 2
a(3) = 15

Wyjaśnienie

Całkowicie zignorowałem wcześniej określone polecenia, z wyjątkiem tego, )że nie miałem wystarczająco dużo miejsca.

Naprawdę przydatne polecenia są tutaj:

iv      >>)2%æ~
 >:3*1+*^

Rozciągnięty do linii prostej:

i:3*1+*)2%æ~

Z wyjaśnieniem:

i:3*1+*)2%æ~ stack
i            [1]      takes input
 :           [1,1]    duplicates
  3          [1,1,3]  pushes 3
   *         [1,3]    multiplies
    1        [1,3,1]  pushes 1
     +       [1,4]    adds
      *      [4]      multiplies
       )     [4]      shifts (does nothing)
        2    [4,2]    pushes 2
         %   [2]      divides
          æ  []       prints
           ~ []       halts

Wzór jest następujący a(n) = n(3n+1)/2.

05AB1E, 3 bajty , Adnan , A000292

LLO

Wynik

a(9) = 165
a(10) = 220

Jak to działa

LLO Stack
L   [1,2,3,4,5,6,7,8,9]                         range
 L  [1,1,2,1,2,3,1,2,3,4,...,1,2,3,4,5,6,7,8,9] range of range
  O sum all of them

Odpowiednikiem matematycznym jest sum(sum(n))gdzie sumjest summation.

Jolf, 11 bajtów, QPaysTaxes , A000005

aσ0xxdxxxxx

Dość proste: anapisz σ0(liczbę dzielników) x, a następnie umieść niepotrzebne rzeczy na końcu.

Wypróbuj online! Przycisk zestawu testów jest trochę zepsuty, ale nadal pokazuje prawidłowe wyniki.

(Mogłeś grać w golfa do dwóch bajtów! Po prostu dobrze σ0by to zrobił.)

Python 2, 87 bajtów , Sp3000 , A083054

n=input()
_=int(3**.5*n)-3*int(n/3**.5)########################################
print _

Właściwie to nie takie trudne. Po prostu szukałem sekwencji spełniających ograniczenia, dopóki nie znalazłem takiej, którą można wygenerować w danym obszarze.

Jolf , 11 bajtów, RikerW , A011551

Kod:

c*mf^+91x~P

Wyjaśnienie:

     +91     # add(9, 1) = 10
    ^   x    # 10 ** input
  mf         # floor function (no-op)
 *       ~P  # multiply by phi
c            # ¯\_(ツ)_/¯

Wypróbuj tutaj .

JavaScript (ES6), 119 bajtów, Cᴏɴᴏʀ O'Bʀɪᴇɴ , A178501

x=>(n="=>[[["|x|"##r(###f#n###;##")|n?Math.pow("#<1##].c####t.##pl##[####nc#"|10,"y([###(###(#]###)"|x-1|``):0|`#h####`

Jestem pewien, że rzeczywisty kod generuje trudniejszą sekwencję niż ta, ale tylko z dwoma wyjściami ta sekwencja OEIS jest prosta i pasuje do nich.

Bez wszystkich ignorowanych znaków algorytm jest po prostu x=>x?Math.pow(10,x-1):0.

05AB1E , 5 bajtów, Luis Mendo , A051696

Kod:

Ðms!¿

Wyjaśnienie:

Ð      # Triplicate input.
 m     # Power function, which calculates input ** input.
  s    # Swap two top elements of the stack.
   !   # Calculate the factorial of input.
    ¿  # Compute the greatest common divisor of the top two elements.

Więc w zasadzie oblicza to gcd (n !, n ⁿ ) , czyli A051696 .

Wypróbuj online! .

PHP, 18 bajtów, nazwa insertuserhere , A023443

Kod:

echo$argv[1]+0+~0;

Wynik:

a(0) = -1
a(1) = 0

Oktawa (34 bajty) Stewiego Griffina

Sekwencja to A066911 .

@(m)(mod(m,u=1:m  )&isprime(u))*u'

PHP, 137 bajtów, nazwa insertuserhere tutaj , A000959

Kod:

for($s=range(1,303);$i<($t=count($s));$s=array_merge($s))for($j=($k=++$i==1?2:$s[$i-1])-1;$j<$t;$j+=$k )unset($s[$j]);echo$s[$argv[1]-1];

Wynik:

a(3)  =   7
a(7)  =  21
a(23) =  99

05AB1E, 10 bajtów, George Gibson , A003215

Kod:

Ds3*s1+*1+

Wyjaśnienie:

Oblicza 3 * n * (n + 1) +1, co jest sekwencją Oeis A003215.

Element , 10 bajtów , PhiNotPi , A097547

2_4:/2@^^`

Wypróbuj online!

Wynik

a(3) = 6561
a(4) = 4294967296

Ryba, 6 bajtów , błotniak , A005563

0QhXts

Hej hacki! 0QhI ssą no-ops. hXtpo prostu oblicza (n + 1) ^ 2 - 1.

J, 8 bajtów, Kenny Lau , A057427

Kod:

(-%- )\.

Wynik:

a(0) = 0
a(1..29) = 1

Nie sądzę, żeby to było zamierzone. I nie wiem, dlaczego J miał takie zachowanie. Ale to działa.

Pyth , 70 bajtów, FliiFe , A070650

Kod (z zaciemnioną wersją poniżej):

DhbI|qb"#"qb"#"R!1Iqb"#";=^Q6+""s ]%Q27  ;.qlY+Q1Ih+""Z##;.q)=Z+Z1;@YQ
DhbI|qb"#"qb"#"R!1Iqb"#"#####+""s####2###;##lY+Q1Ih+""Z#####)=Z+Z1;@YQ (obfuscated)

Zasadniczo robi to:

=^Q6%Q27

Oblicza a (n) = n ⁶ % 27 , czyli A070650 . Wyjaśnienie:

=^Q6       # Assign Q to Q ** 6
    %Q27   # Compute Q % 27
           # Implicit output

Wypróbuj tutaj

Python, 108, CAD97 , A005132

def a(n):
 if n == 0: return 0
 f=a(n-1)-n
 return f if f>0 and not f in(a(i)for i in range(n))else a(n-1)+n

Zaciemniony kod:

def a(n):
 ###n####0######n#0
 f=a#######
 return f #f#####a###### f ####a(##f###i#i###a####n##else a#######

Wyjścia:

>>> a(0)
0
>>> a(4)
2
>>> a(16)
8
>>> a(20)
42