OFFSET
1,1
COMMENTS
First differs from its subsequence A360793 at n = 79: a(79) = 1080 = 2^3 * 3^3 * 5 is not a term of A360793.
Numbers k such that the set of distinct prime factorization exponents of k (row k of A136568) is {1, 3}.
The asymptotic density of this sequence is ((zeta(6)/zeta(3)) * Product_{p prime} (1 + 2/p^3 - 1/p^4 + 1/p^5) - 1)/zeta(2) = 0.076359822332835689478... .
LINKS
MATHEMATICA
Select[Range[750], Union[FactorInteger[#][[;; , 2]]] == {1, 3} &]
PROG
(PARI) is(k) = Set(factor(k)[, 2]) == [1, 3];
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Amiram Eldar, Jul 29 2024
STATUS
approved