login
A398442
Numbers k of the form q(k) * rad(k), where rad = A007947 and q(k) is the second smallest distinct prime factor of k.
4
18, 50, 75, 90, 98, 126, 147, 198, 234, 242, 245, 306, 338, 342, 350, 363, 414, 507, 522, 525, 550, 558, 578, 605, 630, 650, 666, 722, 738, 774, 825, 845, 846, 847, 850, 867, 950, 954, 975, 990, 1058, 1062, 1078, 1083, 1098, 1150, 1170, 1183, 1206, 1274, 1275
OFFSET
1,1
COMMENTS
Numbers whose only nontrivial square divisor is the square of their second smallest distinct prime factor. - Peter Munn, Aug 27 2026
Proper subset of A332785 (numbers neither squarefree nor powerful).
Superset of A095990 (numbers with unsorted prime signature (1,2)).
Terms have at least 2 distinct prime factors, therefore, rad(a(n)) is in A120944.
Unsorted prime signature of a(n) is (1,2), followed by zero or more 1's.
Smallest term with m distinct prime factors, with m >= 2, is 3*A002110(m).
LINKS
FORMULA
{a(n)} = {k : A124010(k,1) = 1 and A124010(k,2) = A398302(k) = 2}. - Peter Munn, Aug 27 2026
EXAMPLE
Table of n, a(n) for select n:
n a(n)
---------------------------
1 18 = 2 * 3^2
2 50 = 2 * 5^2
3 75 = 3 * 5^2
4 90 = 2 * 3^2 * 5
5 98 = 2 * 7^2
6 126 = 2 * 3^2 * 7
7 147 = 3 * 7^2
8 198 = 2 * 3^2 * 11
9 234 = 2 * 3^2 * 13
10 242 = 2 * 11^2
11 245 = 5 * 7^2
25 630 = 2 * 3^2 * 5 * 7
MATHEMATICA
nn = 1350; k = 3; mm = nn/k; Union@ Map[If[# <= nn, #, Nothing] &[#*FactorInteger[#][[2, 1]] ] &, Select[Range[mm], And[SquareFreeQ[#], CompositeQ[#] ] &] ]
PROG
(Python)
from math import prod
from sympy import factorint
def ok(k):
f = factorint(k)
lpf = min(f, default=0)
q = min(set(f)-{lpf}, default=0)
return q and k == q * prod(f)
print([k for k in range(1276) if ok(k)]) # Michael S. Branicky, Aug 02 2026
CROSSREFS
Intersection of A060687 and A398375.
Subsequence of A247180, A386796.
Sequences giving numbers whose prime factorization exponents, in canonical representation order and trimmed of any tail of 1's, are as shown: A005117 (), A397710 (2), A397458 (3), A397459 (4), A398443 (5), this sequence (1,2), A398802 (1,3), A398444 (2,2), A398864 (1,1,2), A398948 (1,1,1,2).
Sequence in context: A258211 A354929 A093617 * A089219 A390096 A102835
KEYWORD
nonn,easy,changed
AUTHOR
Michael De Vlieger, Jul 30 2026
STATUS
approved