Đây là chủ đề của bọn cướp. Chủ đề của cảnh sát ở đây .

Trong luồng cảnh sát, nhiệm vụ là viết một chương trình / hàm lấy số nguyên dương (hoặc không âm) và xuất / trả về một số khác (không nhất thiết là số nguyên). Nhiệm vụ của bọn cướp là xắp xếp lại mã mà cảnh sát sử dụng để tạo đầu ra này.

Mã bị bẻ khóa không nhất thiết phải giống hệt nhau, miễn là nó có cùng độ dài và bất kỳ ký tự được tiết lộ nào đều ở đúng vị trí. Ngôn ngữ cũng phải giống nhau (số phiên bản có thể khác nhau). Đầu ra tất nhiên phải giống hệt nhau.

Không có op-op có thể được sử dụng trong giải pháp của kẻ cướp.

Người chiến thắng trong chuỗi cướp sẽ là người dùng đã bẻ khóa nhiều lần gửi nhất vào ngày 7 tháng 5 năm 2016. Nếu có một sự ràng buộc, người dùng đã bẻ khóa các bài nộp với mã kết hợp dài nhất sẽ giành chiến thắng.

Nội dung gửi phải được định dạng như thế này:

Ngôn ngữ, nn ký tự (bao gồm liên kết để trả lời), tên người dùng của Cop

Mã số:

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

Đầu ra

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

Tùy chọn giải thích và ý kiến.

MATL, 5 byte, Luis Mendo

H5-*|

Mã này tính toán abs((2-5)*input)chỉ a(n)=3*ndành cho số dương, đó là http://oeis.org/A008585

Lục giác , 7 byte, Adnan , A005843

?{2'*!@

hoặc là

 ? {
2 ' *
 ! @

Hãy thử trực tuyến!

Đơn giản chỉ cần tăng gấp đôi đầu vào (và giả sử đầu vào tích cực). Mã này (chỉ một lần) được thực hiện theo thứ tự đọc. Mã sử ​​dụng ba cạnh bộ nhớ A , B , C với con trỏ bộ nhớ bắt đầu như được hiển thị:

?    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 byte, Cᴏɴᴏʀ O'Bʀɪᴇɴ

Mã

2+*:@p:

Đầu ra

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

Hãy thử nó với J.js .

Làm thế nào nó hoạt động

Chuỗi A061725 được định nghĩa là a (n): = p _n ² + 2 , trong đó p _n là số nguyên tố ^thứ (n + 1) .

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 byte , Adnan , A001788

Læ€OO

Hãy thử trực tuyến! Điều này sử dụng một định nghĩa thay thế được đưa ra trên trang. Giải trình:

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

JavaScript, 10 byte , user81655 , A033999

Tôi nghĩ rằng tôi đã nhận nó. Vâng. Điều này thực sự khó khăn. Tôi thích bài nộp vì nó phụ thuộc rất nhiều vào các ưu tiên.

Đó là chuỗi A033999 :

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

Nguồn

t=>~t.z**t

Giải trình

Nếu bạn tách mã này theo các ưu tiên của toán tử JavaScript, bạn sẽ nhận được:

1. .(ưu tiên 18 ) được đánh giá đầu tiên và t.zsẽ trở lại undefined.
2. ~(ưu tiên 15 ) cố gắng truyền undefined, kết quả 0và trả về -1sau bitwise không.
3. **(ưu tiên 14 ) sẽ trở lại -1 ^ t, nơi tlà lẻ hoặc thậm chí , dẫn đến -1hoặc 1.

Bản giới thiệu

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

Hãy thử trước khi mua

Tôi sẽ trao một phần thưởng 100 rep cho bài nộp Cop tuyệt vời này.

Phần tử , 7 byte , PhiNotPi , A000042

_'[,1`}

Ghi chú: Tôi đã bị lừa bởi }vì quá lâu. Vì vậy, nó cũng phù hợp [.

Hãy thử trực tuyến!

Làm thế nào nó hoạt động:

_'[,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 byte , insertusernamehere , A079978

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

Trả về 1 nếu đối số của nó là bội của 3 và 0 khác. Không nhiều hơn thế.

MATL , 9 byte, cốc thủy tinh , A022844

Mã (có khoảng trắng ở cuối):

3x2xYP*k 

Hãy thử trực tuyến!

Tìm thấy ba trận đấu sau đây với một kịch bản tôi đã viết:

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.",

Tôi đã cố gắng thực hiện cái đầu tiên, về cơ bản được thực hiện với 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 byte , Easterly Irk , A001477

axx

Bao gồm một con mèo đơn giản ( ax) theo sau là không có op. Không chắc chắn những gì cảnh sát đã đi cho ở đây.

Java, 479 byte , Daniel M. , A000073

Mã số:

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 )));
    }
}

Nếu bạn bỏ lỡ các ký tự không được tiết lộ, chúng được thay thế bằng khoảng trắng.

Ruby, 38 byte, lịch sử , A008592

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

Có thể khác với giải pháp dự định khi tôi tìm thấy điều này bằng tay.

05AB1E , 4 byte, Paul Picard , A001317

Mã số:

$Fx^

Hãy thử trực tuyến!

Giải trình:

$      # 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

Chuỗi về cơ bản là một tam giác Sierpinki nhị phân:

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

Và chuyển sang công thức a (n) = a (n - 1) XOR (2 × a (n - 1))

May mắn thay, tôi nhớ cái này :)

Silo , betseg , A001844

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

Hãy thử trực tuyến!

Jolf, 5 ký tự , Cᴏɴᴏʀ O'Bʀɪᴇɴ , A033536

Mã số:

!K!8x

Đầu ra:

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

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

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

Đầu ra

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

Giải trình

Tôi hoàn toàn bỏ qua các lệnh được chỉ định trước, ngoại trừ )vì tôi không có đủ dung lượng.

Các lệnh thực sự hữu ích ở đây:

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

Kéo dài thành một đường thẳng:

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

Với lời giải thích:

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

Công thức là a(n) = n(3n+1)/2.

05AB1E, 3 byte , Adnan , A000292

LLO

Đầu ra

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

Làm thế nào nó hoạt động

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

Tương đương toán học là sum(sum(n)), nơi sumlà summation.

Jolf, 11 byte, QPaysTaxes , A000005

aσ0xxdxxxxx

Đủ đơn giản: alert σ0(số lượng ước của) x, sau đó đặt những thứ vô dụng vào cuối.

Hãy thử trực tuyến! Nút bộ kiểm tra hơi bị hỏng, nhưng vẫn hiển thị kết quả chính xác.

(Bạn có thể đánh gôn xuống còn hai byte! Chỉ cần σ0thực hiện tốt thôi.)

Python 2, 87 byte , Sp3000 , A083054

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

Không khó lắm đâu. Chỉ cần tìm kiếm các chuỗi đáp ứng các ràng buộc cho đến khi tôi tìm thấy một chuỗi có thể được tạo trong không gian nhất định.

Jolf , 11 byte, RikerW , A011551

Mã số:

c*mf^+91x~P

Giải trình:

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

Hãy thử nó ở đây .

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

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

Tôi chắc rằng mã thực tế tạo ra một chuỗi phức tạp hơn thế này, nhưng chỉ với hai đầu ra, chuỗi OEIS này là đơn giản và khớp với chúng.

Không có tất cả các ký tự bị bỏ qua, thuật toán chỉ là x=>x?Math.pow(10,x-1):0.

05AB1E , 5 byte, Luis Mendo , A051696

Mã số:

Ðms!¿

Giải trình:

Ð      # 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.

Vì vậy, về cơ bản, tính toán gcd (n!, N ⁿ ) , đó là A051696 .

Hãy thử trực tuyến! .

PHP, 18 byte, insertusernamehere , A023443

Mã số:

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

Đầu ra:

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

Octave (34 byte) của Stewie Griffin

Trình tự là A066911 .

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

PHP, 137 byte, insertusernamehere , A000959

Mã số:

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];

Đầu ra:

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

05AB1E, 10 byte, George Gibson , A003215

Mã số:

Ds3*s1+*1+

Giải trình:

Tính 3 * n * (n + 1) +1 là chuỗi oeis A003215.

Phần tử , 10 byte , PhiNotPi , A097547

2_4:/2@^^`

Hãy thử trực tuyến!

Đầu ra

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

Pyke, 6 byte , cá bùn , A005563

0QhXts

Yay hack! Các 0Qhvà skhông-ops. hXtchỉ cần tính toán (n + 1) ^ 2 - 1.

J, 8 byte, Kenny Lau , A057427

Mã số:

(-%- )\.

Đầu ra:

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

Tôi không nghĩ rằng đây là dự định. Và tôi không biết tại sao J lại có hành vi này. Nhưng nó đã có tác dụng.

Pyth , 70 byte, FliiFe , A070650

Mã (với phiên bản bị xáo trộn bên dưới):

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)

Điều này về cơ bản là:

=^Q6%Q27

Nó tính a (n) = n ⁶ % 27 , là A070650 . Giải trình:

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

Hãy thử nó ở đây

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

Mã bị xáo trộn:

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

Đầu ra:

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