|
|
A198171
|
|
Primes from merging of 7 successive digits in decimal expansion of Pi.
|
|
23
|
|
|
1592653, 6535897, 2643383, 5028841, 6939937, 3993751, 1170679, 8086513, 5822317, 1725359, 4930381, 2881097, 4612847, 3165271, 2712019, 1201909, 4914127, 1133053, 3841469, 1469519, 6951941, 9433057, 9326117, 4462379, 2749567, 5272489, 8912279, 8183011
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Leading zeros are not permitted, so each term is 7 digits in length.
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
|
|
MATHEMATICA
|
With[{len=7}, Select[FromDigits/@Partition[RealDigits[Pi, 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, A198164, A198165, A198166, A198167, A198168, A198169, A198170, A198172, A198173, A198174, A198175, A104851, A198177.
Sequence in context: A234830 A262185 A104827 * A220467 A235174 A234410
Adjacent sequences: A198168 A198169 A198170 * A198172 A198173 A198174
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Harvey P. Dale, Oct 21 2011
|
|
STATUS
|
approved
|
|
|
|