login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A161507 First occurrence of n in A161506. 1
1, 2, 6, 12, 30, 60, 420, 840, 27720, 360360, 6126120, 2677114440, 2406725881560 (list; graph; refs; listen; history; internal format)
OFFSET

1,2

MATHEMATICA

func[n_] := Module[{d=Divisors[n], e=EulerPhi[n]}, Length[Select[d, #>e/2&]]]; k=1; Table[While[func[k]<n, k++ ]; k, {n, 11}]

CROSSREFS

Sequence in context: A100071 A129912 A182863 * A032177 A095349 A022916

Adjacent sequences:  A161504 A161505 A161506 * A161508 A161509 A161510

KEYWORD

nonn

AUTHOR

T. D. Noe (noe(AT)sspectra.com), Jun 17 2009

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 15 03:33 EST 2012. Contains 205694 sequences.