2つの数値を階乗に分解します。共有している場合は、偽の値を返します。それ以外の場合は、真実の値を返します。（この最近の質問に触発された）

言い換えれば、各入力番号を可能な限り貪欲な方法で（正の整数の）階乗の合計として書き込みます。両方の表現に階乗が現れない場合は真実の値を、そうでなければ偽の値を返します。

例

20と49が与えられた場合：

20 = 3! + 3! + 3! + 2!
49 = 4! + 4! + 1!

両方の表現に階乗が現れないため、真理値を返します。

32と132が与えられた場合：

132 = 5! + 3! + 3!
 32 = 4! + 3! + 2!

3！両方の表現に表示されるため、falsey値を返します。

I / O

入力と出力は、任意の標準的な手段で行うことができます。

入力は常に2つの非負整数になります。言語が必要とするもの以外のこれらの整数の上限はありません。

出力は、真偽値または偽値でなければなりません。すべての出力が正しく真実/偽である限り、これらの値は必ずしも異なる入力に対して一貫している必要はありません。

テストケース

1つの入力がの0場合、答えは常に真実です。他の真実のテストケース：

{6, 3}, {4, 61}, {73, 2}, {12, 1}, {240, 2}, {5, 264}, {2, 91}, {673, 18},
 {3, 12}, {72, 10}, {121, 26}, {127, 746}

両方の入力が奇数の整数である場合、または両方の入力が同じ正の整数である場合、出力は常に偽になります。その他の偽のテストケース：

{8, 5}, {7, 5}, {27, 47}, {53, 11}, {13, 123}, {75, 77}, {163, 160}, {148, 53},
 {225, 178}, {285, 169}, {39, 51}, {207, 334}, {153, 21}, {390, 128}, {506, 584},
 {626, 370}, {819, 354}

これはcode-golfなので、最少バイトが勝ちます！

ゼリー、7バイト

Æ!ṠḄ&/¬

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

使い方

Æ!ṠḄ&/¬  Main link. Argument: (x, y) (pair of integers)

Æ!       Convert x and y to factorial base.
  Ṡ      Apply the sign function to each digit.
   Ḅ     Unbinary; convert each resulting Boolean array from base 2 to integer.
    &/   Reduce the resulting pair of integers by bitwise AND.
      ¬  Take the logical NOT of the result.

Pythonの3、93の 91バイト

lambda a,b:k(a)&k(b)=={0}
k=lambda t,n=1,a=1:{t}&{0}or a*n>t and{a-1}|k(t-n)or k(t,n*a,a+1)

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

Python 2、47バイト

h=lambda a,b,d=2:a<1or a%d*(b%d)<h(a/d,b/d,d+1)

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

JavaScript（ES6）、71バイト

(a,b,g=(n,e=1,f=1)=>n>=f&&g(n,++e,f*e)+((n/f|0)%e&&1<<e))=>!(g(a)&g(b))

JavaScriptの整数は53ビットの精度に制限されていますが、これは18ビットで十分です！; これは、18ビットのマスクを使用して、どの階乗が必要かを追跡できることを意味します。

PHP、109バイト

for(;$a?:$a=$argv[++$i];$a-=$r[$i][]=$f,$i<2?:$t+=in_array($f,$r[1]))for($c=$f=1;($a/$f*=$c)>=++$c;);echo!$t;

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

Mathematica、73バイト

F[x_]:=First@IntegerPartitions[x,99,Range[99]!];!IntersectingQ[F@#,F@#2]&

入力フォーム

[x1、x2]

C、122 119バイト

G(q,i){return gamma(q+1)>i?gamma(q):G(q+1,i);}
Q(a,b,u,v){while(a&&b){a-=u=G(1,a);b-=v=G(1,b);if(a==b)exit();}exit(0);}

Q主な機能です。正確に2つの正の整数値で呼び出す必要があります。これは、真実および偽の終了コードで終了します。01

これはTIOでは動作しないようですが、Homebrewが提供されているシステムで動作しgcc 7.1.0ます。

私はCしばらくゴルフをしていませんので、ゴルフのコツは大歓迎です！