|
Search: id:A092117
|
|
|
| A092117 |
|
Numbers n such that the concatenation 2n3n5n7n11n13 is prime. |
|
+0
6
|
|
| 10, 43, 51, 55, 58, 60, 136, 171, 204, 213, 214, 222, 270, 288, 309, 334, 339, 364, 366, 376, 414, 423, 460, 477, 492, 501, 502, 507, 513, 519, 565, 585, 586, 597, 621, 649, 726, 729, 787, 852, 861, 870, 903, 906, 915, 933, 946, 981, 988, 1005, 1038, 1071
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
This concatenation is fp(6, n) as defined in A083677.
|
|
EXAMPLE
|
10 is in the sequence because 210310510710111013 is prime.
|
|
MATHEMATICA
|
v={}; Do[If[PrimeQ[FromDigits[Join[{2}, IntegerDigits[n], {3}, IntegerDigits[n], {5}, IntegerDigits[n], {7}, IntegerDigits[n], {1, 1}, IntegerDigits[n], {1, 3}]]], v=Append[v, n]], {n, 1400}]; v
fp6Q[n_] := PrimeQ[ FromDigits[ Flatten[ IntegerDigits /@ Insert[{2, 3, 5, 7, 11, 13}, n, {{2}, {3}, {4}, {5}, {6}}]]]]; Select[ Range[1100], fp6Q[ # ] &] (from Robert G. Wilson v Dec 11 2004)
|
|
CROSSREFS
|
Cf. A032711, A083677, A083966, A083677, A092115, A083969.
Sequence in context: A027149 A077541 A084036 this_sequence A003866 A057517 A126964
Adjacent sequences: A092114 A092115 A092116 this_sequence A092118 A092119 A092120
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Farideh Firoozbakht (f.firoozbakht(AT)sci.ui.ac.ir), Jun 15 2003
|
|
EXTENSIONS
|
Edited by njas at the suggestion of Andrew Plewe, May 27 2007
|
|
|
Search completed in 0.002 seconds
|
