|
%I #9 Mar 04 2024 01:35:41
%S 2,5,7,11,14,17,21,23,29,31,34,37,39,42,46,51,55,58,61,65,67,70,73,77,
%T 79,83,86,89,93,95,101,103,106,109,111,114,118,122,127,130,133,137,
%U 139,142,145,149,154,157,159,163,166,170,174,178,181,183,186,190,193,195
%N Bisection of A005117.
%F a(n) = A005117(2*n). - _Amiram Eldar_, Mar 04 2024
%t Select[Range[200], SquareFreeQ][[2;;-1;;2]] (* _Amiram Eldar_, Mar 04 2024 *)
%Y Cf. A005117, A099822.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Nov 19 2004
%E More terms from _Hugo Pfoertner_, Nov 20 2004
%E Offset corrected by _Amiram Eldar_, Mar 04 2024
|
