According to subidiom.com the first occurrence of 1984 on Pi is at the 3358th decimal digit.
Irrational Numbers Search Engine
I can use the command “3359 digit of pi” to get a similar output on WolframAlpha including nearby digits as you can see below.
Unfortunately it doesn’t seem to work with e or phi. Does someone have a workaround for that ?
Thanks,
Nice way to get the sequences on Phi! Do you know if it is possible to look for the first occurrence of a given sequence ? Like “1984”, which should be the command to look for the first appearance of this sequence on those constants ? Thank you!
WolframAlpha understands a subset of Mathematica notation. For example it understands this:
Partition[First[RealDigits[Pi,10,100]],4,1]
which gives each subsequent overlapping four tuple of the first 100 digits of Pi in base 10.
What I would then want to do is to find the position of a particular four tuple in that using something like
Position[Partition[First[RealDigits[Pi,10,100]],4,1],{1,5,9,2}]
Unfortunately it appears that the word “Position” somehow confuses this and it is not able to find the position of that four tuple. More unfortunately, I have not been able to find any alternate form of query to accomplish this. But perhaps this might give you or someone else some idea that will lead to a solution.
SequencePosition[First[RealDigits[Pi, 10, 100]], {1, 5, 9, 2}]
(* {{4, 7}} *)
