S000713


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

2, 1, 1, 19, 29, 10, 13, 28, 8, 13, 36, 57, 23, 55, 36, 11, 32, 16, 1, 122, 44, 43, 13, 131, 46, 82, 81, 8, 20, 93, 44, 277, 109, 31, 346, 86, 86, 37, 47, 63, 32, 29, 313, 136, 106, 163, 148, 123, 130, 37, 112, 479, 89, 29, 64, 39, 76, 191, 73, 70, 12, 31, 47, 210

1

S000713

The n-digit primes are given in S000712.

T. D. Noe, Plot of 300 terms

T. D. Noe, Table of 300 terms

Wikipedia, Square root of 3

(Mma) d = RealDigits[Sqrt[3], 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. S000712.

nonn

T. D. Noe, Oct 06 2015

© Tony D Noe 2014-2015