This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A117774 Fibonacci numbers which are divisible by the sum of their digits. 1
 1, 2, 3, 5, 8, 21, 144, 2584, 14930352, 86267571272, 498454011879264, 160500643816367088, 114059301025943970552219, 5358359254990966640871840, 555565404224292694404015791808, 1226132595394188293000174702095995, 18547707689471986212190138521399707760 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Intersection of A005349 and A000045. - Michel Marcus, Jul 11 2016 LINKS Harvey P. Dale, Table of n, a(n) for n = 1..64 EXAMPLE 2584 is in the sequence because (1) it is a Fibonacci number, (2) the sum of its digits is 2+5+8+4=19 and 2584 is divisible by 19. MAPLE with(combinat): a:=proc(n) local ff, sod: ff:=convert(fibonacci(n), base, 10): sod:=add(ff[j], j=1..nops(ff)): if type(fibonacci(n)/sod, integer)=true then fibonacci(n) else fi end: seq(a(n), n=2..180); # Emeric Deutsch, Apr 16 2006 MATHEMATICA Select[Fibonacci[Range[2, 250]], Divisible[#, Total[IntegerDigits[#]]]&] (* Harvey P. Dale, May 06 2013 *) PROG (PARI) {m=170; for(n=2, m, a=fibonacci(n); s=0; k=a; while(k>0, d=divrem(k, 10); k=d[1]; s=s+d[2]); if(a%s==0, print1(a, ", ")))} \\ Klaus Brockhaus, Apr 16 2006 CROSSREFS Cf. A000045, A005349. Sequence in context: A229040 A143873 A273046 * A053056 A041157 A178356 Adjacent sequences:  A117771 A117772 A117773 * A117775 A117776 A117777 KEYWORD base,nonn AUTHOR Luc Stevens (lms022(AT)yahoo.com), Apr 15 2006 EXTENSIONS a(11) to a(16) from Emeric Deutsch and Klaus Brockhaus, Apr 16 2006 a(17) from Harvey P. Dale, May 06 2013 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 25 04:06 EDT 2019. Contains 322450 sequences. (Running on oeis4.)