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

5623, 7309, 6967, 7187, 8753, 7537, 3769, 6679, 9907, 4621, 8753, 4327, 4157, 2309, 1229, 2297, 3583, 6659, 5927, 5927, 5011, 7027, 2851, 1741, 8609, 4079, 7253, 7457, 7759, 3557, 2203, 5701, 5437, 4603, 8689, 6899, 8999, 7069, 4027, 7823, 9293, 3691, 6311

Offset

1,1

Comments

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

Links

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

Mathematica

With[{len=4}, 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, A198162, A198163, A198165, A198166, A198167, A198168, A198169, A198170, A198171, A198172, A198173, A198174, A198175, A104851, A198177.

Sequence in context: A074242 A032737 A237507 * A058003 A202098 A247261

Adjacent sequences: A198161 A198162 A198163 * A198165 A198166 A198167

Keyword

nonn,base

Author

Harvey P. Dale, Oct 21 2011

Status

approved