S000711


Position of the first n-digit prime in the digits of sqrt(2).

5, 2, 4, 8, 8, 6, 7, 4, 5, 2, 37, 31, 49, 59, 33, 18, 72, 62, 43, 49, 2, 34, 23, 3, 39, 25, 16, 429, 12, 2, 10, 125, 11, 3, 52, 108, 6, 3, 136, 60, 32, 2, 101, 167, 157, 9, 88, 129, 42, 249, 56, 84, 9, 94, 1, 311, 66, 65, 121, 40, 139, 74, 118, 136, 50, 665, 143

1

S000711

The n-digit primes are given in S000710.

T. D. Noe, Plot of 300 terms

T. D. Noe, Table of 300 terms

Wikipedia, Square root of 2

(Mma) d = RealDigits[Sqrt[2], 10, 1000]; t = {}; n = 1; While[d1 = Partition[d[[1]], n, 1]; s = Select[d1, Ceiling[Log[10, FromDigits[#]]] == n && PrimeQ[FromDigits[#]] &, 1]; s != {}, AppendTo[t, {FromDigits[s[[1]]], Position[d1, s[[1]], 1, 1][[1, 1]]}]; n++]; Transpose[t][[2]]

Cf. S000710.

nonn

T. D. Noe, Oct 06 2015

© Tony D Noe 2014-2015