OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
38 is in the sequence since 2 divides 38, 3 divides 39 and 4 divides 40.
MATHEMATICA
dvsQ[n_]:=Module[{dvsrs=Rest[Most[Divisors[n]]]}, Table[Divisible[n+1, dvsrs[[i]]+1] && Divisible[n+2, dvsrs[[i]]+2], {i, Length[dvsrs]}]]; Select[Range[2, 450], !PrimeQ[#]&&Or@@dvsQ[#]&] (* Harvey P. Dale, Dec 28 2011 *)
PROG
for (int a = 1; a < 200; a++) for (int b = 2; b < a; b++) if ((a%b==0)&&((a+1)%(b+1)==0)&&((a+2)%(b+2)==0)) cout << a << ", "; // outputs a
(PARI) isok(n) = {fordiv(n, d, if ((d>1) && (d<n) && ! ((n+1) % (d+1)) && ! ((n+2) % (d+2)), return (1)); ); } \\ Michel Marcus, Sep 18 2019
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Anne M. Donovan (anned3005(AT)aol.com), May 21 2003
STATUS
approved