|
Search: id:A068394
|
|
|
| A068394 |
|
Numbers n such that the n-th digit of Pi and the n-th digit of e are the same. |
|
+0
3
|
|
| 12, 16, 17, 20, 33, 39, 44, 55, 58, 69, 80, 94, 99, 142, 169, 205, 243, 262, 274, 278, 293, 323, 325, 330, 333, 360, 364, 387, 388, 395, 411, 419, 427, 428, 452, 459, 460, 461, 483, 493, 499, 500, 503, 506, 511, 522, 525, 547, 581, 590, 594, 595, 598, 602
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Let dPi(n) be the n-th digit of Pi=3,14159...dPi(2)=4 and de(n) be the n-th digit of e=2,718...de(2)=1 then dPi(12)=de(12)=9 hence 12 is in the sequence.
|
|
MAPLE
|
P:=proc(i) local a, b, c, x, y, n; a:=evalf(Pi-3, 1000); b:=evalf(exp(1)-2, 1000); c:=1; for n from 0 by 1 to i do x:=trunc(a*10); y:=trunc(b*10); a:=evalf(frac(a*10), 1000); b:=evalf(frac(b*10), 1000); if x=y then print(c); fi; c:=c+1; od; end: P(900); [From Paolo P. Lava (ppl(AT)spl.at), Oct 22 2008]
|
|
PROGRAM
|
(MAGMA) m:=610; p:=Pi(RealField(m+1)); sp:=IntegerToString(Round(10^m*(p-3))); e:=Exp(One(RealField(m+1))); se:=IntegerToString(Round(10^m*(e-2))); [ a: a in [1..m] | sp[a] eq se[a] ]; [From Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Sep 04 2009]
|
|
CROSSREFS
|
Sequence in context: A167304 A135451 A143090 this_sequence A126763 A058080 A119911
Adjacent sequences: A068391 A068392 A068393 this_sequence A068395 A068396 A068397
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Mar 08 2002
|
|
EXTENSIONS
|
Listed terms verified by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Sep 04 2009
|
|
|
Search completed in 0.002 seconds
|
