◆101から463の範囲に
素数は65個

101, 103, 107, 109, 113,
127, 131, 137, 139, 149,
151, 157, 163, 167, 173,
179, 181, 191, 193, 197,
199, 211, 223, 227, 229,
233, 239, 241, 251, 257,
263, 269, 271, 277, 281,
283, 293, 307, 311, 313,
317, 331, 337, 347, 349,
353, 359, 367, 373, 379,
383, 389, 397, 401, 409,
419, 421, 431, 433, 439,
443, 449, 457, 461, 463,

◆superPCM関数
Table[Product[(2n-1)^(C(0,3-a))
C(0,C(0,((n-a)^(2a-2)mod(2a-1)))),{a,3,30}],{n,50,232}]

{0, 101, 103, 0, 107, 109, 0, 113,
0, 0, 0, 0, 0, 0, 127, 0, 131, 0, 0,
137, 139, 0, 0, 0, 0, 149, 151, 0,
0, 157, 0, 0, 163, 0, 167, 0, 0, 173,
0, 0, 179, 181, 0, 0, 0, 0, 191, 193,
0, 197, 199, 0, 0, 0, 0, 0, 211, 0, 0,
0, 0, 0, 223, 0, 227, 229, 0, 233, 0,
0, 239, 241, 0, 0, 0, 0, 251, 0, 0, 257,
0, 0, 263, 0, 0, 269, 271, 0, 0, 277,
0, 281, 283, 0, 0, 0, 0, 293, 0, 0, 0,
0, 0, 0, 307, 0, 311, 313, 0, 317, 0,
0, 0, 0, 0, 0, 331, 0, 0, 337, 0, 0, 0,
0, 347, 349, 0, 353, 0, 0, 359, 0, 0,
0, 367, 0, 0, 373, 0, 0, 379, 0, 383,
0, 0, 389, 0, 0, 0, 397, 0, 401, 0, 0,
0, 409, 0, 0, 0, 0, 419, 421, 0, 0, 0,
0, 431, 433, 0, 0, 439, 0, 443, 0, 0,
449, 0, 0, 0, 457, 0, 461, 463}


◆的中率100％