OFFSET
1,2
COMMENTS
Consists of the union of {1,2,4,6,18} and the numbers {p^r: p = prime of the form 4k+3, r >= 1}.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Joshua Harrington, Tony W. H. Wong, On super totient numbers and super totient labelings of graphs, Discrete Mathematics Vol. 343, Iss. 2, February 2020, 111670.
M. Khalid Mahmood and Shahbaz Ali, A Novel Labeling Algorithm on Several Classes of Graphs, Punjab University Journal of Mathematics, Vol. 49, No. 2 (2017), pp. 23-35.
MATHEMATICA
Sort @ Join[{1, 2, 4, 6, 18}, Select[Range[500], PrimeNu[#] == 1 && Mod[FactorInteger[#][[1, 1]], 4] == 3 &]] (* Amiram Eldar, Apr 14 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Feb 22 2020
STATUS
approved