1,3

Limit_{n->inf.} a(n)/3^n = 1-e^(-1/2).

ip={ the list of irregular primes to 12 million }; Table[ Length[ Select[ip, # < Prime[3^n] &]], {n, 9}]

Cf. A105458, A105462.

Sequence in context: A096167 A060453 A038382 this_sequence A027074 A036922 A036926

Adjacent sequences: A105464 A105465 A105466 this_sequence A105468 A105469 A105470

hard,nonn

Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 07 2005