|
|
A029566
|
|
Quasi-Carmichael numbers to base -6: squarefree composites n such that prime p|n ==> p+6|n+6.
|
|
3
|
|
|
148219, 287274, 3543794, 38718219, 142500794, 211860799, 293790169, 378321938, 552333594, 850684829, 1033256883, 1454938619, 1464112007, 1493284930, 1848698699, 2692083869, 3183401369, 3428629709, 3447827069
(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[#, 6] &] (* Giovanni Resta, May 21 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|