|
| |
|
|
A082773
|
|
Integers n such that there exists at least one divisor p of n, 1 < p < n, such that p divides n, p+1 divides n+1 and p+2 divides n+2.
|
|
0
| |
|
|
14, 26, 38, 50, 62, 63, 64, 74, 86, 98, 110, 122, 123, 124, 134, 146, 158, 170, 174, 182, 183, 184, 194, 206, 215, 218, 230, 242, 243, 244, 254, 266, 278, 290, 302, 303, 304, 314, 326, 338, 342, 350, 362, 363, 364, 368, 374, 386, 398, 410, 422, 423, 424, 425
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
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[#]&] (* From 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
|
|
|
CROSSREFS
| Sequence in context: A079702 A176274 A191992 * A112772 A155505 A086258
Adjacent sequences: A082770 A082771 A082772 * A082774 A082775 A082776
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Anne M. Donovan (anned3005(AT)aol.com) May 21 2003
|
| |
|
|
