A029568 - OEIS

%I #14 May 21 2013 11:12:18

%S 343027,387127,1344517,1430449,2125642,2383417,3537667,3542797,

%T 5808067,7592577,7834042,7930117,9241627,12122947,15250942,21928717,

%U 37908667,39355867,39627217,49825117,60738622,71092717,90640927,110995807

%N Quasi-Carmichael numbers to base -8: squarefree composites n such that prime p|n ==> p+8|n+8.

%H Giovanni Resta, <a href="/A029568/b029568.txt">Table of n, a(n) for n = 1..379</a> (terms < 10^12)

%H <a href="/index/Ca#Carmichael">Index entries for sequences related to Carmichael numbers.</a>

%t qcp[n_, d_] := Block[{p, e}, {p, e} = Transpose@FactorInteger@n;

%t Length[p] > 1 && Max[e] == 1 && And @@ IntegerQ /@ ((n + d)/(p + d))]; Select[Range[10^6], qcp[#, 8] &] (* _Giovanni Resta_, May 21 2013 *)

%K nonn

%O 1,1

%A _David W. Wilson_