>>718
>これが>r=3以上で後回しにされたpをr=2のグループと紐付ける際、余る可能性に対処しきれていない
r=2は全てpの素因数が2であるものをrの倍数として設定できる。論文の3ページの証明。

＞　If p = 19 Then
＞p = 16
＞End If
意味不明の極みだ。

＞その場合、このアルゴリズムはエラーをはく
このプログラムをn=10^10ぐらいまで計算できるよう改修して
そうなるnを発見してください。