This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A257492 #14 May 07 2023 01:11:18 %S A257492 13,15,19,43,46,49,53,60,64,66,71,78,100,102,107,108,114,134,138,139, %T A257492 140,158,162,170,171,173,177,178,185,191,196,230,240,254,271,290,304, %U A257492 314,322,360,368,395,396,402,407,416,437,439,440,443,448,465,468,472 %N A257492 Positions where Pi and the Golden Ratio have a common decimal digit. %t A257492 With[{nn=1000},Flatten[Position[Thread[{RealDigits[GoldenRatio,10,nn][[1]],RealDigits[Pi,10,nn][[1]]}],_?(#[[1]]==#[[2]]&),{1},Heads-> False]]] %o A257492 (Python) %o A257492 from sympy import S %o A257492 digits = 1000 %o A257492 pi, phi = str(S.Pi.n(digits+3)), str(S.GoldenRatio.n(digits+3)) %o A257492 print([k for k in range(2, digits+1) if pi[k] == phi[k]]) # _Michael S. Branicky_, May 06 2023 %Y A257492 Cf. A052055, A257494. %K A257492 nonn,base %O A257492 1,1 %A A257492 _Harvey P. Dale_, Apr 26 2015