|
| |
| |
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
T. D. Noe and Donovan Johnson, Table of n, a(n) for n = 1..86 (first 79 terms from T. D. Noe)
|
|
|
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 * A199191 A102570 A113007
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
|
| |
|
|
