|
|
A029944
|
|
a(n)^2 contains n-th prime as a substring.
|
|
4
|
|
|
5, 6, 5, 24, 34, 37, 42, 14, 48, 23, 56, 61, 21, 66, 69, 73, 77, 19, 26, 131, 86, 89, 94, 17, 176, 318, 321, 226, 331, 337, 113, 146, 371, 118, 339, 123, 397, 128, 409, 416, 134, 426, 438, 44, 346, 447, 46, 473, 472, 479, 483, 352, 79, 501, 507, 513, 519
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
John Cerkan, Table of n, a(n) for n = 1..10000
|
|
EXAMPLE
|
E.g. 34^2 = 1156 is first square that contains the string "11".
|
|
MATHEMATICA
|
With[{e = 2}, Table[Function[p, k = 1; While[Length@ SequencePosition[ IntegerDigits[Set[c, k^e]], p] == 0, k++]; c]@ IntegerDigits@ Prime@ n, {n, 57}] ^(1/e)] (* Michael De Vlieger, May 04 2017, Version 10.1 *)
|
|
CROSSREFS
|
Cf. A038690, A068165.
Sequence in context: A011258 A217177 A157339 * A197494 A334381 A153415
Adjacent sequences: A029941 A029942 A029943 * A029945 A029946 A029947
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Patrick De Geest
|
|
STATUS
|
approved
|
|
|
|