OFFSET
0,2
COMMENTS
Partial sums of A060828 expressed in ternary.
LINKS
SÃlvia Casacuberta, Irrationality of the sum of a p-adic series, arXiv:1710.11484 [math.NT], 2017.
MATHEMATICA
FromDigits@ IntegerDigits[#, 3] & /@ Accumulate@ Array[3^IntegerExponent[#!, 3] &, 29, 0] (* Michael De Vlieger, Nov 01 2017 *)
PROG
(PARI) a(n) = fromdigits(digits(sum(m=0, n, 3^valuation(m!, 3)), 3), 10);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Marcus, Nov 01 2017
STATUS
approved