OFFSET
1,1
COMMENTS
"Digit" refers to the sequence of digits past the period, 1st digit having value 1/2:
00100100001111110110... for Pi and
10110111111000010101... for exp(1). - R. J. Mathar, Mar 22 2012
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
With[{eb2=Drop[RealDigits[E, 2, 150][[1]], 2], pb2=Drop[RealDigits[Pi, 2, 150] [[1]], 2]}, Select[Range[130], eb2[[#]]==pb2[[#]]&]] (* Harvey P. Dale, Mar 22 2012 *)
PROG
(PARI) E=binary(exp(1))[2]; P=binary(Pi)[2]; for(n=1, min(#E, #P), E[n]==P[n] && print1(n", ")) \\ M. F. Hasler, Mar 22 2012
(PARI) E=exp(1); for(n=1, 150, (Pi\.5^n-E\.5^n)%2 || print1(n", ")) \\ M. F. Hasler, Mar 22 2012
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Benoit Cloitre, Mar 09 2002
STATUS
approved