|
Search: id:A112928
|
|
| |
|
| 3, 5, 13, 19, 61, 73, 101, 109, 151, 181, 193, 199, 229, 241, 271, 313, 349, 353, 421, 433, 523, 601, 661, 811, 829, 883, 1021, 1033, 1051, 1063, 1093, 1153, 1279, 1321, 1429, 1451, 1453, 1489, 1609, 1621, 1667, 1669, 1789, 1873, 1933, 1951, 1999, 2029
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
MAPLE
|
with(numtheory): a:=proc(n) local p, B, j: p:=ithprime(n): B:={}: for j from p+1 to p+20 do if abs(mobius(j))>0 then B:=B union {j} else B:=B fi od: B[1] end: A:=[seq(a(m), m=1..400)]: b:=proc(k) if isprime(A[k])=true then A[k] else fi end: seq(b(i), i=1..400); (Deutsch)
|
|
CROSSREFS
|
Cf. A112925, A112926, A061400, A112929, A112930.
Sequence in context: A038941 A141215 A106915 this_sequence A106916 A034484 A059872
Adjacent sequences: A112925 A112926 A112927 this_sequence A112929 A112930 A112931
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet Oct 06 2005
|
|
EXTENSIONS
|
More terms from Emeric Deutsch (deutsch(AT)duke.poly.edu), Oct 14 2005
|
|
|
Search completed in 0.002 seconds
|
