OFFSET
1,1
COMMENTS
The sequence only considers digits after the decimal point in base 3. - Harvey P. Dale, Aug 08 2026
EXAMPLE
MATHEMATICA
With[{nn=170}, {pid=Drop[RealDigits[Pi, 3, nn][[1]], 2]}, {ed=Drop[RealDigits[E, 3, nn][[1]], 1]}, Position[Thread[{pid, Most[ed]}], _?(#[[1]]==#[[2]]&), 1, Heads->False]]//Flatten (* Harvey P. Dale, Aug 08 2026 *)
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Benoit Cloitre, Mar 09 2002
STATUS
approved