%I #8 Jul 19 2021 20:12:00
%S 836,45356,91388,243892,254012,338572,343876,388076,29465852,
%T 120888092,259858324,260378492,410832532,775397948,785187524,
%U 903217276,989226964,1609445332,2358115084,3254323124,3381352084,3381872252,3781448788,3782267372,5056717796,5065605532
%N Primitive weird numbers (pwn; A002975) divisible by 4 but not 8.
%e a(1) = 836 = 2^2 * 11 * 19;
%e a(2) = 45356 = 2^2 * 17 * 23 * 29;
%e a(3) = 91388 = 2^2 * 11 * 31 * 67; etc.
%t (* import the b-file in A002975 and assign it to lst *); Select[lst, IntegerExponent[#, 2] == 2 &]
%Y Cf. A002975, A258375, A258401, A258882, A258883, A258884, A258885, A319735.
%K nonn
%O 1,1
%A _Robert G. Wilson v_, Dec 13 2018
|