login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A332798
Numbers whose smallest prime factor is 19.
7
19, 361, 437, 551, 589, 703, 779, 817, 893, 1007, 1121, 1159, 1273, 1349, 1387, 1501, 1577, 1691, 1843, 1919, 1957, 2033, 2071, 2147, 2413, 2489, 2603, 2641, 2831, 2869, 2983, 3097, 3173, 3287, 3401, 3439, 3629, 3667, 3743, 3781, 4009, 4237, 4313, 4351, 4427
OFFSET
1,1
COMMENTS
The asymptotic density of this sequence is 3072/323323. - Amiram Eldar, Dec 06 2020
REFERENCES
Emmanuel Desurvire, Classical and Quantum Information Theory: An Introduction for the Telecom Scientist, Cambridge University Press, 2009, table 20.5 p. 421.
LINKS
FORMULA
a(n) = 19*A166061(n).
EXAMPLE
a(2) = 19*19, a(3) = 19*23.
MATHEMATICA
19 * Select[Range[235], CoprimeQ[#, 510510] &] (* Amiram Eldar, Feb 24 2020 *)
PROG
(Rexx)
P = 19 ; S = P
do N = P by 2 while length( S ) < 255
do I = 1 until P = X
X = PRIME( I )
if P = X then leave I
if N // X = 0 then iterate N
end I
S = S || ', ' P*N
end N
say S ; return S
CROSSREFS
Cf. A084967 (5), A084968 (7), A084969 (11), A084970 (13), A332799 (17), A332797 (23), A166061 (19-rough numbers).
Sequence in context: A192568 A171324 A078368 * A209227 A208504 A207877
KEYWORD
nonn,easy
AUTHOR
Frank Ellermann, Feb 24 2020
STATUS
approved