OFFSET
1,2
COMMENTS
The numbers of terms not exceeding 10^k, for k = 1, 2, ..., are 1, 21, 261, 2824, 29144, 294233, 2951313, 29542282, 295514868, 2955441810, 29555347819, ... . Apparently, the asymptotic density of this sequence exists and equals 0.2955... . - Amiram Eldar, Sep 09 2022
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..10000
EXAMPLE
60 = 2^2 * 3^1 * 5^1 is included, as bitwise-anding together the binary representations of the exponents, "10", "01" and "01" results "00", zero.
MATHEMATICA
{1}~Join~Select[Range@ 300, BitAnd @@ Map[Last, FactorInteger@ #] == 0 &] (* Michael De Vlieger, Feb 07 2016 *)
PROG
(Scheme, with Antti Karttunen's IntSeq-library)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Feb 03 2016
EXTENSIONS
Erroneous claim corrected by Antti Karttunen, Feb 07 2016
STATUS
approved