A344980 Numbers k such that A011772(k) does not divide A344875(k).
12, 14, 15, 20, 22, 30, 33, 35, 38, 42, 44, 45, 46, 48, 51, 52, 54, 56, 60, 62, 63, 65, 66, 69, 70, 72, 76, 77, 80, 84, 85, 86, 87, 88, 90, 91, 92, 94, 95, 99, 102, 104, 105, 108, 110, 112, 114, 115, 116, 117, 118, 119, 123, 124, 126, 130, 132, 133, 134, 135, 138, 140, 141, 142, 143, 144, 145, 148, 152, 153, 154, 156
Offset: 1
Keywords
Crossrefs
Programs
-
PARI
A011772(n) = { if(n==1, return(1)); my(f=factor(if(n%2, n, 2*n)), step=vecmax(vector(#f~, i, f[i, 1]^f[i, 2]))); forstep(m=step, 2*n, step, if(m*(m-1)/2%n==0, return(m-1)); if(m*(m+1)/2%n==0, return(m))); }; \\ From A011772 A344875(n) = { my(f=factor(n)~); prod(i=1, #f, (f[1, i]^(f[2, i]+(2==f[1, i]))-1)); }; isA344980(n) = (A344875(n)%A011772(n));
Comments