[交流] 一个数论的小猜想 已有4人参与

2楼: Originally posted by alober at 2017-08-07 15:38:41
错的，例如J=101。

f[k_?IntegerQ] :=
Module[{nums, A, B, c}, nums = Table[n, {n, k, 2*k - 3}];
  B = Cases[nums, _?PrimeQ]; A = Cases[nums, _?OddQ];
  c = Complement[A, B]; {Cases[Range[k], _?PrimeQ] // Length,
   c // Length}
  ]

3楼: Originally posted by Mr__Right at 2017-08-07 17:34:08
如果奇数J不大于71，还是可以的；一旦大于71就不妙了，反例接着反例。
J=71是一个刚好相等的点。看上去楼主的规律可以从新归纳一下

可以说，71之前是一种楼主所提到的一边倒的规律，71之后反过来。可能这 ...

2楼: Originally posted by alober at 2017-08-07 15:38:41
错的，例如J=101。