|
Search: id:A087269
|
|
| |
|
| 1, 9, 12, 18, 21, 25, 26, 28, 32, 34, 35, 36, 42, 45, 49, 52, 55, 57, 60, 65, 68, 69, 70, 74, 76, 81, 84, 85, 86, 87, 88, 91, 95, 98, 99, 104, 106, 110, 111, 112, 119, 121, 128, 129, 130, 133, 135, 141, 143, 145, 147, 155, 158, 159, 160, 161, 162, 165, 170, 172, 177
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
t=Table[GCD[w, PrimePi[w]], {w, 1, 1000}]; f=Flatten[Position[t, 1]]; cf=Part[f, Flatten[Position[PrimeQ[f], False]]]
|
|
CROSSREFS
|
Cf. A007053, A000720, A087266-A087268, A057809.
Sequence in context: A154631 A141552 A162822 this_sequence A153973 A072702 A157973
Adjacent sequences: A087266 A087267 A087268 this_sequence A087270 A087271 A087272
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Sep 16 2003
|
|
|
Search completed in 0.002 seconds
|
