Das sind Polizisten und Räuber . Dies ist der Cops- Thread. Den Räuberfaden finden Sie hier .

Seit ich der Site beigetreten bin, habe ich eine Reihe von OEIS-Herausforderungen (Online Encyclopedia of Integer Sequences) festgestellt. Es scheint nur fair zu sein, dass wir eine Herausforderung für Polizisten und Räuber haben, die ein für alle Mal bestimmt, wer der Meister der Online-Ganzzahlsequenzen ist.

Bearbeiten: Um triviale Antworten zu vermeiden, verlieren Polizisten 1/2 Punkt für jede Einsendung, die geknackt wird. Außerdem sind für die Zwecke dieser Herausforderung konstante Sequenzen nicht zulässig. Dies gilt nur für Lösungen, die nach dieser Bearbeitung veröffentlicht wurden.

Cops

Schreiben Sie ein Programm oder eine Funktion, die ohne Eingabe deterministisch eine Sequenz aus dem OEIS druckt . Durch Löschen einer Teilmenge der Zeichen muss Ihr Programm in der Lage sein, eine andere OEIS-Sequenz zu drucken, wenn es in derselben Sprache ausgeführt wird. Die neue Sequenz muss völlig neu sein, nicht nur die erste mit einem anderen Namen oder einem anderen Versatz. Keine der Sequenzen kann einfach ein wiederholter konstanter Wert sein.

Sie müssen die erste Funktion zusammen mit dem Namen der OEIS-Sequenz angeben, damit die Richtigkeit überprüft werden kann. Es ist in Ordnung, wenn das Verhalten in Bezug auf den MAX_INT-Wert Ihrer Sprache oder 256 fraglich wird, je nachdem, welcher Wert größer ist.

Räuber

Löschen Sie Zeichen aus der Übermittlung eines Cop, sodass Ihr neues Programm eine andere Sequenz vom OEIS ausgibt. Geben Sie die neue Funktion zusammen mit dem Namen der neuen OEIS-Sequenz an. Hier ist ein Dienstprogramm, mit dem Sie sicherstellen können, dass Ihre Übermittlung gültig ist (dh Zeichen werden ohne lustige Geschäfte gelöscht. Überprüft die Reihenfolge selbst nicht.)

Es liegt in Ihrem besten Interesse, so viele Zeichen wie möglich aus der Einreichung des Cop zu löschen. Wenn ein anderer Räuber (außer dem Cop, der das ursprüngliche Programm verfasst hat) vorbeikommt und eine kürzere Lösung findet, die eine andere Reihenfolge findet, stiehlt dieser Räuber Ihren Standpunkt. (Beachten Sie, dass das einfache Abspielen von Zeichen und das Drucken derselben Sequenz nicht ausreicht, um den Punkt zu stehlen.)

Regeln & Wertung

Wenn nach einer Woche niemand in der Lage war, Ihre Lösung zu knacken, können Sie Ihre Lösung als sicher markieren, indem Sie das zweite Programm zusammen mit dem Namen der von ihm generierten Sequenz angeben.

Sie erhalten einen Punkt für jede sichere Veröffentlichung und einen Punkt für jede Einsendung, die Sie knacken. Cops verlieren 1/2 Punkt für jede geknackte Einreichung. Beachten Sie, dass ein anderer Räuber jederzeit Ihren Punkt aus der geknackten Einreichung stehlen kann, indem er ein kürzeres Programm bereitstellt, das eine andere Sequenz ergibt.

Cops dürfen nur eine Herausforderung pro Sprache und Person posten.

Der Spieler mit den meisten Punkten am 7. Juli um 12:00 UTC gewinnt.

MarioLANG , 23 Bytes geknackt

   >+
 :<":
>+^!<
===#=

Probieren Sie es online aus!

erzeugt die ungeraden Zahlen A005408

C, A000217, 239 Bytes Gebrochen

Das ist kein Code-Golf, also habe ich mich nicht darum gekümmert.

#include <stdio.h>
#include <limits.h>
int main()
{
    int i, n, temp = 0;
    for(i = 0; i < INT_MAX; i++)
    {
        n = 0;
        temp = i;
        while(temp)
            n+=temp--;
        printf("%d, ", n);
    }
    return 0;
}

Sequenz: https://oeis.org/A000217

Python 2, 273 Bytes, geknackt

Anfangssequenz: A004442

import zlib, base64;exec(zlib.decompress(base64.b64decode('eJzLtDUAAAHoANc=')))
while True:print eval(zlib.decompress(base64.b64decode('eJwzAgAAMwAz')))^eval(zlib.decompress(base64.b64decode('eJwzjssEAAHBAPs='))),;exec(zlib.decompress(base64.b64decode('eJzL1LY1BAAC1AED')))

Probieren Sie es online aus!

MOO, 86 Bytes, sicher

a=0;b=1;while(a>-1)a=$math_utils:sum(a,a);a=max(1,a);notify(player,tostr(a));endwhile

Druckt Zweierpotenzen (A000079).

Lösung:

a = 1; während (a> -1) a = $ math_utils: Summe (a, a, a); benachrichtigen (Spieler, tostr (a)); endwhile (die stattdessen Potenzen von 3 (A000244) druckt)

PHP , 20 Bytes geknackt

for(;;)echo+!$i,",";

Probieren Sie es online aus!

Drucksequenz https://oeis.org/A000012

cQuents (älteres Commit), 10 Bytes, geknackt

=0,1,1:z+y

Dies ist immer noch eine stark WIP-Sprache, aber ich habe den Interpreter so gepatcht, dass er funktioniert. Klicken Sie auf den Sprachnamen für den Github-Link.

Dies gibt die Fibonnacci-Sequenz aus: A000045

Erläuterung:

(weil ich keine Dokumentation habe und nicht erwarte, dass Sie meinen Dolmetschercode lesen)

=0,1,1      Set start to [0,1,1]
      :     Mode: sequence
       z+y  Each term is the previous two terms added together
            Because there is no input, output the whole sequence

Wenn konstante Sequenzen noch erlaubt wären, wäre dies super einfach auszurauben.