login
A119431
Primitive elements of A054741.
2
6, 10, 14, 22, 26, 34, 38, 46, 58, 62, 74, 82, 86, 94, 105, 106, 118, 122, 134, 142, 146, 158, 165, 166, 178, 194, 195, 202, 206, 214, 218, 226, 254, 262, 274, 278, 298, 302, 314, 326, 334, 346, 358, 362, 382, 386, 394, 398, 422, 446, 454, 458, 466, 478, 482
OFFSET
1,1
COMMENTS
Elements of A054741 that are not divisible by any smaller element of that sequence.
LINKS
FORMULA
Consists of 2p for p an odd prime, plus odd elements of A119433.
MATHEMATICA
seqQ[n_] := 2*EulerPhi[n] < n; primQ[n_] := seqQ[n] && AllTrue[Most@Divisors[n], ! seqQ[#] &]; Select[Range[500], primQ] (* Amiram Eldar, Feb 29 2020 *)
CROSSREFS
Sequence in context: A369966 A055163 A342192 * A207574 A278972 A241817
KEYWORD
nonn
AUTHOR
STATUS
approved