OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..10000
EXAMPLE
Illustration for a(1) = 17 from N. J. A. Sloane, Oct 09 2019:
3.141592653589793*23*8462...
2.718281828459045*23*5360...
MATHEMATICA
Module[{nn=10000, pid, ed, wd=2}, pid=FromDigits/@Partition[RealDigits[Pi, 10, nn][[1]], wd, 1]; ed=FromDigits/@Partition[RealDigits[E, 10, nn][[1]], wd, 1]; Position[Thread[{pid, ed}], _?(#[[1]]==#[[2]]&), 1, Heads->False]]//Flatten
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Harvey P. Dale, Oct 09 2019
STATUS
approved