A198162 Primes from merging of 2 successive digits in decimal expansion of sqrt(2).

41, 13, 23, 37, 73, 67, 71, 53, 37, 73, 31, 17, 67, 79, 97, 73, 37, 79, 73, 47, 53, 43, 41, 73, 13, 23, 29, 97, 83, 73, 37, 41, 97, 83, 31, 41, 13, 59, 59, 79, 11, 71, 47, 59, 97, 71, 59, 97, 53, 59, 47, 17, 41, 89, 19, 23, 29, 23, 43, 71, 43, 83, 97, 79, 79

Offset

1,1

Comments

Leading zeros are not permitted, so each term is 2 digits in length.

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

With[{len=2}, Select[FromDigits/@Partition[RealDigits[Sqrt[2], 10, 1000][[1]], len, 1], IntegerLength[#]==len&&PrimeQ[#]&]]

Crossrefs

Cf. A103773, A103789, A103793, A103808, A103809, A103810, A103811, A103812, A104824, A104825, A104826, A104843, A104844, A104845, A104846, A104847, A104848, A104849, A104850, A198161, A198163, A198164, A198165, A198166, A198167, A198168, A198169, A198170, A198171, A198172, A198173, A198174, A198175, A104851, A198177.

Sequence in context: A095188 A215540 A107813 * A304581 A153682 A033361

Adjacent sequences: A198159 A198160 A198161 * A198163 A198164 A198165

Keyword

nonn,base

Author

Harvey P. Dale, Oct 21 2011

Status

approved