A080065 Numbers n such that n == 3 modulo (spf(n)+1), where spf(m) is the smallest prime dividing m (A020639).

3, 15, 27, 39, 51, 63, 75, 87, 91, 99, 111, 123, 135, 147, 159, 171, 183, 195, 203, 207, 219, 231, 243, 255, 259, 267, 279, 291, 303, 315, 327, 339, 351, 363, 371, 375, 387, 399, 411, 423, 427, 435, 447, 459, 471, 483, 495, 507, 519, 531, 539, 543, 555, 567

Offset

1,1

Comments

A080063(m) = 3 iff m = a(k) for some k.

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

Select[Range[600], Mod[#, FactorInteger[#][[1, 1]]+1]==3&] (* Harvey P. Dale, Aug 15 2013 *)

Crossrefs

Cf. A080064.

Sequence in context: A110703 A121250 A105549 * A017557 A147041 A347536

Adjacent sequences: A080062 A080063 A080064 * A080066 A080067 A080068

Keyword

nonn

Author

Reinhard Zumkeller, Jan 24 2003

Status

approved