ご存知のように、クインは独自のソースコードを出力するプログラムです。ただし、別の別のプログラムを出力して、最初のプログラムを再度出力するプログラムを作成することもできます。たとえば、Python 2プログラム

x = '''x = {}
print 'print '+'"'*3+x.format("'"*3+x+"'"*3)+'"'*3'''
print 'print '+'"'*3+x.format("'"*3+x+"'"*3)+'"'*3

実行すると、次のテキストが出力されます。

print """x = '''x = {}
print 'print '+'"'*3+x.format("'"*3+x+"'"*3)+'"'*3'''
print 'print '+'"'*3+x.format("'"*3+x+"'"*3)+'"'*3"""

Pythonプログラムとして実行すると、元のコードが再び出力されます。これは反復クインと呼ばれます。元のコードに戻すには2回実行する必要があるため、ピリオド2を持っていると言います。しかし、もちろん、もっと長い期間も可能です。

あなたの課題は、可能な限り長い期間の反復クインを、選択した言語で100バイト以下で記述することです。（上記の私の例は、末尾の改行を含めて119バイトであるため、この仕様には適合しません。）

次の規則と説明に注意してください。

• 通常のquine規則が適用されます。つまり、プログラムは独自のソースコードに直接アクセスできる言語機能を使用できません。
• 反復された出力は、最終的に元のコードに正確にループバックする必要があり、デモンストレーションまたはそれができることの証明を含める必要があります。
• また、サイクルがそうである限り、そのサイクルが長い理由の説明も含める必要があります。これは数学的な証明のレベルである必要はありませんが、あなたの言語に精通している誰かに説得力があるはずです。（この規則はここにあります。非常に大きな数の回答が含まれると予想されるためです。）
• 少なくともそれが長いことを証明できる限り、正確な数を与えるのではなく、「少なくとも1,000,000回の反復」のようなことを言っても問題ありません。この場合、スコアは1,000,000になります。そうでなければ、あなたのスコアはあなたのクインの期間です。
• 100バイトの制限は初期プログラムにのみ適用されます-それが出力するプログラムは長くなる可能性がありますが、元のコードを出力するには、最終的に100バイトに戻す必要があります。
• マシンに無限のRAMと無限のランタイムがあると想定できますが、言語に無制限の精度のデータ型（整数など）がない場合は想定できません。あなたはできるあなたのパーサが処理できる入力の長さに制限はありませんと仮定します。
• 最も高いスコアが勝ちます。

注意：Quit Whiningと呼ばれる既存の課題があります。クインを繰り返すことには、クインの反復も含まれます。ただし、同じコンセプトに基づいていることを除けば、これらはまったく異なるタイプの課題です。もう1つはまっすぐなコードゴルフですが、これは（意図的に！）偽装で忙しいビーバーの問題です。この質問への適切な回答を生成するために必要な手法は、他の質問への回答に必要なものとは非常に異なる可能性が高く、これは仕様によるものです。

PHP、期間2,100,000,000

PHPでこれが可能だと誰が思ったでしょう？！:-)

これは実際には私の最初のクインで、長さは99バイトです。

<?$i=1;$i*=21e8>$i;printf($a='<?$i=%d;$i*=21e8>$i;printf($a=%c%s%c,++$i,39,$a,39);',++$i,39,$a,39);

PHPは2 * 10^8からintegerに切り替えるよりも大きな数をサポートしますがdouble、インクリメントは機能せず（無限ループにつながります）、100バイトに収まる別の解決策は見つかりませんでした。まだ。

証拠は、21億のリセットポイントに到達するまで各反復でカウントアップするだけなので、かなり単純です。

クレジットデイブコメントにとの擬似コードでアプローチを掲示し、ボブTwells私は最小限のPHPのQUINEのコードをコピーし誰から、。

テストプログラム（sloooooow）：

<?php
$o = file_get_contents('quine.php');
for ($i = 0; $i < 22e8; $i++) {
    if ($i%2==0) exec('php q > p'); else exec('php p > q');
    $a = file_get_contents(($i%2==0) ? 'p' : 'q');
    echo "\r" . str_pad($i,6,' ') . ":\t$a";
    if ($a == $o) {
        die;
    }
}

ええと、少なくとも私が最初に答えます。

Mathematica、期間E8.5678＃3 E2.1923＃ 4〜E6.2695＃3＃2

Print[ToString[#0, InputForm], "[", #1 - 1 /. 0 -> "Nest[#!,9,9^9^99!]", "]"] & [Nest[#!,9,9^9^99!]]

スコアはHyper-E表記で説明されていることに注意してください。反復により、final Nest[#!,9,9^9^99!]がNest[#!,9,9^9^99!]-1、Nest[#!,9,9^9^99!]-2、Nest[#!,9,9^9^99!]-3、...、3、2、1の10進展開に置き換えられ、に戻りNest[#!,9,9^9^99!]ます。

R、期待値のランダムな期間2 ^ 19936-0.5

f=function(){
    options(scipen=50)
    body(f)[[4]]<<-sum(runif(623))
    0
    cat("f=")
    print(f)
}

Rのデフォルトの乱数ジェネレーターの周期は2 ^ 19937-1で、623の連続次元で等分布です。したがって、その期間のどこか（ただし1回だけ）は、623の長さのゼロのベクトルになります。そこに着くと（そしてシーケンスの開始に合わせて）、次の623個のランダムなU [0,1]数の合計がゼロになり、元のプログラムに戻ります。

プログラムは非常に高い確率で、ゼロに戻る前に同じ非ゼロ状態を数回通過することに注意してください。たとえば、合計311.5が最も可能性が高く、発生する可能性のある方法は多数ありますが、RNGでは0の期間を311.5の期間より長くすることができます。

JavaScript、期間9,007,199,254,700,000

勝つことはできませんが、この課題でJavaScriptを使用するのは楽しいものでした。

a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),1-1||90071992547e5)

次のサイクルに従います。

a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),1-1||90071992547e5)
a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),9007199254700000-1||90071992547e5)
a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),9007199254699999-1||90071992547e5)
a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),9007199254699998-1||90071992547e5)
// etc...
a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),3-1||90071992547e5)
a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),2-1||90071992547e5)
a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),1-1||90071992547e5)
a="a=%s;console.log(a,uneval(a),%.0f-1||90071992547e5)";console.log(a,uneval(a),9007199254700000-1||90071992547e5)
// and so on

注：次のように、スコアの〜0.08％のみを削除しながら、18バイト短くすることができます。

a="a=%s;console.log(a,uneval(a),%.0f-1||9e15)";console.log(a,uneval(a),1-1||9e15)

C、期間2,100,000,000

unsigned long long i;main(a){i=1;i*=21e8>i;printf(a="ungisned long long i;main(a){i=%d;i*=21e8>i;printf(a=%c%s%2$c,++i,34,a);}",++i,34,a);}

PHPの回答に基づいています（明らかに）。時間がありましたら説明で更新します。

C（gcc）、66バイト、ピリオド2 ^ 64

f(s){printf(s="f(s){printf(s=%c%s%1$c,34,s,%lu+1L);}",34,s,0+1L);}

オンラインでお試しください！

2 ^ 64の数値はunsigned long整数で使用できます。したがって、2 ^ 64の期間。

Python 2

$9\uparrow((99\uparrow\uparrow(9\uparrow((99\uparrow\uparrow(9\uparrow((99\uparrow\uparrow(9\uparrow\uparrow5-1))\uparrow9)-1))\uparrow9)-1))\uparrow9)+1$

$9\uparrow9\uparrow(99\uparrow\uparrow12)+1$

b=0;s="print'b=%d;s=%r;exec s'%(-~b%eval('9**9'*eval('9**9'*eval('9**9'*9**9**9**9**9))),s)";exec s

オンラインでお試しください！

コードでは、それまでのb=0変更はb=1、b=2それが到達するまで続き、b=decimal expansion of the periodその後リセットされてb=0

Gol> <>、70バイト、ピリオド32588319662129706495760020617571905647680487948828870818800327491986095953477010107951243339634806280305573964022539575879085231587686846939060379372963971590813619650590816522713615428796947583901754481192603680808959620908188187202502606962818148577208902602602812819448608520260260961128518020260260696281944857720890260260121212

非常に大きい（3.25E270）と呼ばれることもある

":1=l8:*6+=S&Q~:'~'=Q~~'H#'||lPffXfX=?1:1=Q$~$~|:1)lPffXfX(Q?:|r2ssH##

これは実際には、500バイトのイテレータに置いた回答の変更バージョンです

":1=l8:*6+=S&Q~:'~'=Q~~'H#'||//if last is equal to 1 and length is 71, delete the delete char, if the last char is '~', delete and push 'H#', which will later return to 'H##', completing the cycle!
lPffXfX=?1:1=Q$~$~|          //if length is equal to 15^15^15, then start delete process(append ascii one)
:1)lPffXfX(Q?:|              //if the last character is not 1 (the delete checker), and length is less than 15^15^15, duplicate the last value and append
r2ssH##                      //push the " to the front and output the whole thing

うまくいけば、私はスコアを正しく取得し、バグはありません。この値を実際に計算する実際の方法はなく、理論的なものです。しかし、それは膨大な数です!!!

オンラインでお試しください！