login
A110406
List of k primes ending in k, where k == 1, 3, 7 or 9 (mod 10).
0
11, 3, 13, 23, 7, 17, 37, 47, 67, 97, 107, 19, 29, 59, 79, 89, 109, 139, 149, 179, 11, 211, 311, 811, 911, 1511, 1811, 2011, 2111, 2311, 2411, 13, 113, 313, 613, 1013, 1213, 1613, 1913, 2113, 2213, 2713, 3313, 3413, 17, 317, 617, 1117, 1217, 2017, 2417, 2617
OFFSET
1,1
COMMENTS
Lists the 1st entry in A030430, the first 3 entries of A030431, the first 7 entries of A030432, the first 9 entries of A030433, the first 11 entries of A167442 etc.
EXAMPLE
Terms corresponding to 7 are 7, 17, 37, 47, 67, 97, 127. 13 occurs for 3 as well as for 13.
11;
3,13,23;
7,17,37,47,67,97,107;
19,29,59,79,89,109,139,149,179;
MATHEMATICA
f[n_] := Take[ Select[p, Mod[ #, 10^Floor[ Log[10, n] + 1]] == n &], n]; p = Prime[ Range[10^5]]; lst = Select[ Range[1, 17, 2], Mod[ #, 10] != 5 &] (* Robert G. Wilson v *)
CROSSREFS
Sequence in context: A205960 A302556 A088262 * A237454 A375614 A110434
KEYWORD
base,easy,nonn,tabf
AUTHOR
Amarnath Murthy, Jul 30 2005
EXTENSIONS
Corrected and extended by Robert G. Wilson v, Jul 30 2005
STATUS
approved