Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #38 Aug 02 2021 14:47:26
%S 4,6,8,11,12,14,18,19,21,22,25,27,29,31,34,36,37,38,42,44,46,47,48,50,
%T 53,58,59,61,63,65,67,68,70,73,74,75,78,80,82,84,85,88,90,93,95,99,
%U 100,101,105,106,110,111,112,114,115,117,121,122,125,127,129,130
%N Numbers k such that k-th prime is of the form 6*m+1.
%C A002476 indexed by A000040.
%C Also k for which prime(k) == 1 (mod 3). - _Bruno Berselli_, Mar 04 2016
%C Sequence A091177 (indices of primes of the form 3*k-1) is this sequence's complement in the positive integers without {2}. - _M. F. Hasler_, Sep 02 2016
%C The asymptotic density of this sequence is 1/2 (by Dirichlet's theorem). - _Amiram Eldar_, Feb 28 2021
%H Zak Seidov, <a href="/A091178/b091178.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = k such that A000040(k) = A002476(n).
%t Select[Range[200],IntegerQ[(Prime[#]-1)/6]&] (* _Harvey P. Dale_, Aug 25 2013 *)
%o (PARI) isok(n) = !((prime(n)-1) % 6); \\ _Michel Marcus_, Mar 04 2016
%Y Cf. A000040, A002476 (primes of the form 6*m+1), A091177 (indices of primes of the form 3*k-1), A024892, A024899.
%K nonn
%O 1,1
%A _Ray Chandler_, Dec 26 2003
%E Definition edited by _Zak Seidov_, Oct 09 2014