login
a(0)=1, followed by highly safe primes: positions of records in A292936.
1

%I #18 Oct 01 2017 00:28:59

%S 1,2,5,11,23,47,2879,71850239,2444789759,21981381119

%N a(0)=1, followed by highly safe primes: positions of records in A292936.

%C The starting offset is 0 to accommodate 1, which is only nonprime in this sequence, and also to align with the indexing used in A110056.

%C Sequence starts like A007505, and at least for terms a(5) .. a(9) is equal to A110056.

%t With[{s = Table[SelectFirst[Range[0, 10], ! PrimeQ@ Floor[n/(2^#)] &], {n, 10^7}]}, Map[FirstPosition[s, #][[1]] &, Union@ FoldList[Max, s]]] (* _Michael De Vlieger_, Sep 29 2017 *)

%Y Cf. A007505, A066174, A110056, A292936.

%Y Cf. A000040, A005385, A066179, A157358, A157359 (each starts with the term a(1) .. a(5) of this sequence).

%K nonn,more

%O 0,2

%A _Antti Karttunen_, Sep 28 2017