A316504 Numbers n such that A090086(n+1) > n+1.
0, 1, 2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 37, 41, 47, 53, 59, 71, 83, 89, 101, 109, 139, 149, 157, 179, 199, 307, 461, 571
Offset: 1
Programs
-
PARI
a090086(n) = {forcomposite(k=2, , if (Mod(n, k)^(k-1) == 1, return (k)); ); } isok(n) = a090086(n+1) > n+1; \\ Michel Marcus, Aug 12 2018
Comments