Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A080072
Values of n such that Pi^n is farther from its closest integer than any Pi^k for 1 <= k < n.
0
1, 4, 8, 31, 61, 89, 200, 217, 257, 1366, 3642, 4926, 20265
OFFSET
1,2
COMMENTS
"Farthest from an integer" only really makes sense if we choose "nearest" or "farthest" integer. I chose nearest here. "Farthest from farthest" would just make "nearest to nearest" and would be sequence A080052. I think.
EXAMPLE
E.g., Pi^1=3.14159265... Pi^2=9.869..., Pi^3=31.00627..., Pi^4=97.40909... so Pi^4 is farther from 97 (its closest integer) than Pi^3 is from 31, or Pi^2 is from 10.
MAPLE
b := array(1..5000): Digits := 10000: c := 0: pos := 0: for n from 1 to 10000 do: exval := evalf(Pi^n): if (abs(exval-round(exval))>c) then c := (abs(exval-round(exval))): pos := pos+1: b[pos] := n: print(n):fi: od: seq(b[n], n=1..pos);
PROG
(PARI) default(realprecision, 20000); d=0.0; p=Pi; a=1; for(n=1, 40000, a*=p; s=abs(a-round(a)); if(s>d, d=s; print1(n, ", "))) \\ Robert Gerbicz, Aug 22 2006
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Mark Hudson (mrmarkhudson(AT)hotmail.com), Jan 24 2003
EXTENSIONS
More terms from Robert Gerbicz, Aug 22 2006
STATUS
approved