|
|
A029568
|
|
Quasi-Carmichael numbers to base -8: squarefree composites n such that prime p|n ==> p+8|n+8.
|
|
3
|
|
|
343027, 387127, 1344517, 1430449, 2125642, 2383417, 3537667, 3542797, 5808067, 7592577, 7834042, 7930117, 9241627, 12122947, 15250942, 21928717, 37908667, 39355867, 39627217, 49825117, 60738622, 71092717, 90640927, 110995807
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
qcp[n_, d_] := Block[{p, e}, {p, e} = Transpose@FactorInteger@n;
Length[p] > 1 && Max[e] == 1 && And @@ IntegerQ /@ ((n + d)/(p + d))]; Select[Range[10^6], qcp[#, 8] &] (* Giovanni Resta, May 21 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|