|
%I #16 Jan 24 2023 02:50:23
%S 1,2,5,6,7,10,11,13,14,17,18,19,22,23,25,26,29,30,31,34,35,37,38,41,
%T 42,43,46,47,49,50,53,54,55,58,59,61,62,65,66,67,70,71,73,74,77,78,79,
%U 82,83,85,86,89,90,91,94,95,97,98,101,102,103,106,107,109,110,113,114,115,118,119,121,122,125
%N Numbers that are neither multiples of 4 nor of the form 6u+3.
%C Numbers that are neither odd multiples of 3 nor multiples of 4.
%C Numbers k for which A252463(k) is odd.
%C Numbers that are congruent to {1, 2, 5, 6, 7, 10, 11} mod 12. - _Amiram Eldar_, Jan 24 2023
%H Amiram Eldar, <a href="/A359375/b359375.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Rec#order_08">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,0,0,0,0,1,-1).
%t Select[Range[125], Mod[#, 6] != 3 && Mod[#, 4] > 0 &] (* _Amiram Eldar_, Jan 24 2023 *)
%o (PARI) isA359375(n) = A359374(n);
%Y Cf. A000035, A064989, A252463, A359374 (characteristic function), A359376 (complement).
%Y Cf. also A359380.
%K nonn,easy
%O 1,2
%A _Antti Karttunen_, Dec 31 2022
|
