The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A135205 Numbers n for which Sum_digits(n!!) is a multiple of Sum_digits(n). 3
 1, 2, 3, 4, 6, 9, 10, 11, 12, 15, 18, 20, 21, 24, 25, 27, 30, 32, 33, 36, 42, 45, 46, 54, 55, 63, 72, 75, 81, 88, 90, 91, 93, 100, 101, 102, 105, 108, 111, 112, 117, 120, 121, 122, 123, 124, 126, 127, 135, 141, 144, 153, 154, 156, 162, 171, 176, 180, 182, 189, 198 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 LINKS G. C. Greubel, Table of n, a(n) for n = 0..1000 EXAMPLE 11 -> 11*9*7*5*3*1=10395 -> (1+0+3+9+5)/(1+1)=9 MAPLE P:=proc(n) local i, j, k, w, x; for i from 1 by 1 to n do w:=0; k:=i; while k>0 do w:=w+k-(trunc(k/10)*10); k:=trunc(k/10); od; x:=i; j:=i-2; while j >0 do x:=x*j; j:=j-2; od: k:=x; x:=0; while k>0 do x:=x+k-(trunc(k/10)*10); k:=trunc(k/10); od; if trunc(x/w)=x/w then print(i); fi; od; end: P(1000); MATHEMATICA Select[Range[100], Divisible[Total[IntegerDigits[#!!, 10]], Total[IntegerDigits[#, 10]]] &] (* G. C. Greubel, Sep 30 2016 *) CROSSREFS Cf. A004152, A120390, A108825, A129980, A131954, A131955, A135204, A135206. Sequence in context: A082976 A242407 A047419 * A145733 A111251 A047300 Adjacent sequences:  A135202 A135203 A135204 * A135206 A135207 A135208 KEYWORD easy,nonn,base AUTHOR Paolo P. Lava, Nov 30 2007 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 March 28 14:04 EDT 2020. Contains 333089 sequences. (Running on oeis4.)