login
A300098
Records of A288814.
1
6, 10, 28, 52, 76, 184, 248, 376, 424, 488, 584, 664, 1335, 3729, 3801, 6501, 7385, 9669, 10461, 16345, 17815, 26571, 27895, 28479, 45237, 69485, 81835, 123411, 124345, 140465, 207005, 341665, 361749, 396815, 526809, 592491, 890165, 977727, 1377485, 1992215, 2186585
OFFSET
1,1
COMMENTS
Also records of A295185.
FORMULA
a(n) = A288814(A300097(n)).
PROG
(PARI) isok(k, n) = my(f=factor(k)); sum(j=1, #f~, f[j, 1]*f[j, 2]) == n;
scompo(n) = forcomposite(k=4, , if (isok(k, n), return(k)));
lista(nn) = {my(last = 0); forprime(p=4, nn, my(val = scompo(p)); if (val > last, print1(val, ", "); last = val); ); }
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Marcus, Feb 24 2018
STATUS
approved