Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A119666
Each term k provides a value of (sum-of-digits of 5^k)/k that is closer to Pi than the previous value.
2
1, 2, 4, 6, 8, 139, 309, 390, 819, 2868, 6751, 8045, 9414, 15008, 15375, 56839, 84383, 151286, 307650, 516962, 533919, 2021009
OFFSET
1,2
MATHEMATICA
a = Infinity; fn = 1; p = N[Pi, 24]; Do[ fn = 5fn; b = N[ Abs[Pi - Plus @@ IntegerDigits@fn/n], 24]; If[b < a, a = b; Print@n], {n, 711000}] (* Robert G. Wilson v, Sep 08 2007 *)
CROSSREFS
Sequence in context: A228327 A081507 A115336 * A087302 A351777 A030149
KEYWORD
base,fini,nonn,more
AUTHOR
Hans Havermann, Jul 29 2006, Jul 31 2006, Aug 05 2006
STATUS
approved