|
%I #7 Oct 19 2016 10:23:21
%S 13,27,41,55,69,83,97,111,125,139,153,167,181,182,196,210,224,238,252,
%T 266,280,294,308,322,336,350,364,365,379,393,407,421,435,449,463,477,
%U 491,505,519,533,547,548,562,576,590,604,618,632,646,660,674,688,702
%N n! never ends in this many 0's in base 13.
%H Charles R Greathouse IV, <a href="/A136773/b136773.txt">Table of n, a(n) for n = 1..10000</a>
%o (PARI) valp(n, p)=my(s); while(n\=p, s+=n); s
%o is(n)=my(t=(12*n-1)\13*13+13,s=valp(t,13)-n); while(s<0, s+=valuation(t+=13, 13)); s>0 \\ _Charles R Greathouse IV_, Oct 19 2016
%Y Cf. A000142, A136763, A136699, A000966, A055938, A096346, A136767, A136768, A136769, A136770, A136771, A136772, A136774.
%K base,nonn
%O 1,1
%A _Carl R. White_, Jan 21 2008
|
