reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
E = Sum[A081368[n]/10^a(n),{n,1,Length}]; Solve for a(n).
(PARI) v=[71, 828, 1828, 45904, 5235360, 2874713, 52662497, 757247093, 6999595749, 66967627724, 76630353547, 5945713821785, 25166427427466, 391932003059921, 8174135966290435, 72900334295260595, 630738132328627943];
concat([0], vector(#v, n, sum(j=1, n, #digits(v[j])))) \\ Joerg Arndt, Aug 13 2013
nonn,base,less,changed
editing
proposed
Edited by Joerg Arndt and Michel Marcus, Aug 13 2013
proposed
editing
editing
proposed
Clear[a, n];
The sequence of powers necessary to reconstruct Exp[0] from Thanh Diep's sequence A081368.
proposed
editing