OFFSET
0,2
LINKS
Robert Israel, Table of n, a(n) for n = 0..10000
FORMULA
a(n) = 1 + Sum_{k=1..n} ceiling(k*log_5(7)). - Robert Israel, Nov 16 2016
MAPLE
ListTools:-PartialSums([1, seq(ceil(k*log[5](7)), k=1..100)]); # Robert Israel, Nov 16 2016
MATHEMATICA
Table[1 + Sum[Ceiling[k Log[5, 7]], {k, n}], {n, 0, 52}] (* Michael De Vlieger, Nov 16 2016 *)
PROG
(PARI) a(n)=my(N=1); n+1+sum(i=1, n, logint(N*=7, 5)); \\ Charles R Greathouse IV, Jan 11 2018
(PARI) first(n)=my(s, N=1/7); vector(n+1, i, s+=logint(N*=7, 5)+1) \\ Charles R Greathouse IV, Jan 11 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
Offset changed to 0 by Robert Israel, Nov 16 2016
STATUS
approved