login
A091179
A088878 indexed by A000040.
4
2, 3, 4, 5, 6, 9, 12, 14, 15, 16, 18, 19, 20, 27, 30, 31, 33, 38, 39, 42, 43, 44, 47, 54, 55, 56, 58, 59, 62, 63, 65, 67, 68, 69, 74, 79, 83, 84, 86, 89, 91, 93, 94, 99, 100, 102, 107, 108, 110, 122, 123, 129, 133, 134, 135, 139, 143, 147, 153, 154, 155, 156, 162, 167
OFFSET
1,1
LINKS
FORMULA
a(n)=k such that A000040(k) = A088878(n).
MAPLE
select(n -> isprime(3*ithprime(n)-2), [$1..1000]); # Robert Israel, Mar 04 2016
MATHEMATICA
PrimePi@ Select[Prime@ Range@ 167, PrimeQ[3 # - 2] &] (* Michael De Vlieger, Mar 04 2016 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Ray Chandler, Dec 27 2003
EXTENSIONS
Offset corrected by Michael De Vlieger, Mar 04 2016
STATUS
approved