A131934 Records in A014197.

2, 3, 4, 5, 6, 10, 11, 17, 21, 31, 34, 37, 38, 49, 54, 72, 98, 126, 129, 176, 178, 247, 276, 281, 331, 359, 399, 441, 454, 525, 558, 692, 718, 734, 764, 1023, 1138, 1485, 1755, 2008, 2166, 2590, 2702, 2733, 3169, 3687, 3802, 4133, 4604, 5025, 5841, 6019, 6311

Offset

1,1

Links

Jud McCranie, Table of n, a(n) for n = 1..109 (terms 1..79 from T. D. Noe, terms 80..86 from Donovan Johnson)

Formula

a(n) = A014197(A097942(n)). - R. J. Mathar, Nov 07 2007

Maple

# For the function HighlyTotientNumbers see A097942.
A131934_list := n -> seq(s[2], s = HighlyTotientNumbers(n));
A131934_list(500); # Peter Luschny, Sep 01 2012

Prog

(Sage)
# For the function HighlyTotientNumbers see A097942.
A131934_list = lambda n: [s[1] for s in HighlyTotientNumbers(n)]
A131934_list(500) # Peter Luschny, Sep 01 2012

Crossrefs

Cf. A000010, A014197, A097942.

Sequence in context: A018578 A056910 A212774 * A066501 A199191 A102570

Adjacent sequences: A131931 A131932 A131933 * A131935 A131936 A131937

Keyword

nonn

Author

N. J. A. Sloane, Nov 05 2007

Extensions

More terms from R. J. Mathar, Nov 07 2007

Deleted my csh program which is unstable at high indices - R. J. Mathar, Mar 17 2010

Corrected and extended by T. D. Noe, Mar 16 2010

Status

approved