login
A117952
Perrin numbers which are divisible by the sum of their digits.
1
2, 3, 5, 7, 10, 12, 90, 209, 486, 644, 1130, 3480, 963935, 5209407, 3233514234548132, 1012112601190792234002, 18348324030778496342550922713690, 2107377545862489429119439140954710648307, 842301502360957349559574408551746623721263774871322
OFFSET
1,1
COMMENTS
a(20) has 64 digits and it is too large to include in the data section. - Amiram Eldar, Feb 08 2021
LINKS
FORMULA
a(n) = A001608(k): A007953(a(n)) | a(n) for some k. - R. J. Mathar, Jun 02 2006
EXAMPLE
963935 is in the sequence because it is a Perrin number and it is divisible by the sum of the digits, 9+6+3+9+3+5 = 35.
MATHEMATICA
Union @ Select[LinearRecurrence[{0, 1, 1}, {2, 3, 2}, 500], Divisible[#, Plus @@ IntegerDigits[#]] &] (* Amiram Eldar, Feb 08 2021 *)
CROSSREFS
Intersection of A001608 and A005349.
Cf. A007953.
Sequence in context: A191327 A109598 A117959 * A090420 A162999 A064509
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), May 03 2006
EXTENSIONS
More terms from R. J. Mathar, Jun 02 2006
STATUS
approved