|
|
A349233
|
|
Numbers k such that k and k+2 are consecutive cubefree numbers.
|
|
3
|
|
|
7, 15, 23, 26, 31, 39, 47, 53, 55, 63, 71, 87, 95, 103, 107, 111, 119, 124, 127, 143, 151, 159, 161, 167, 175, 183, 188, 191, 199, 207, 215, 223, 231, 239, 242, 247, 249, 255, 263, 269, 271, 279, 287, 303, 311, 319, 323, 327, 335, 359, 367, 377, 383, 391, 399
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The asymptotic density of this sequence is 0.142325864924778... (Mossinghoff et al., 2021).
|
|
LINKS
|
|
|
EXAMPLE
|
7 is a term since 7 and 7 + 2 = 9 = 3^2 are cubefree, and 7 + 1 = 8 = 2^3 is not.
|
|
MATHEMATICA
|
cubeFreeQ[n_] := AllTrue[FactorInteger[n][[;; , 2]], # < 3 &]; Select[Range[400], Boole[cubeFreeQ /@ (# + {0, 1, 2})] == {1, 0, 1} &]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|