login
Numbers that begin a run of at least 4 consecutive integers having exactly 6 distinct prime factors each (i.e., belonging to A074969).
0

%I #12 Aug 12 2023 02:05:21

%S 7933641735,9338016258,9827010633,10744118592,10808993635,10928652579,

%T 13302330390,15300915705,16088310249,16408242849,18685633314,

%U 18721086153,19136152098,19819102092,20592248544,20826707802,21241193334,21296349633,21531380583,21727956885,21823418253

%N Numbers that begin a run of at least 4 consecutive integers having exactly 6 distinct prime factors each (i.e., belonging to A074969).

%e 7933641735 is in the sequence as it starts a run of at least 4 consecutive integers each of which has exactly 6 distinct prime factors.

%e That is, each of 7933641735 = 3 * 5 * 23 * 83 * 461 * 601,

%e 7933641735 + 1 = 7933641736 = 2^3 * 17 * 47 * 59 * 109 * 193,

%e 7933641735 + 2 = 7933641737 = 7 * 29 * 31 * 41 * 97 * 317,

%e 7933641735 + 3 = 2 * 3 * 11 * 89 * 563 * 2399 has 6 distinct prime factors.

%o (PARI) upto(n) = {my(res = List(), streak = 0); n+=3; forfactored(i = 1, n, if(omega(i[2]) == 6, streak++; if(streak >= 4, listput(res, i[1]-3)), streak = 0)); res}

%Y Cf. A074969, A364265.

%K nonn

%O 1,1

%A _David A. Corneth_, Jul 24 2023

%E More terms from _Jinyuan Wang_, Aug 12 2023