|
| |
|
|
A094342
|
|
Successive record-setters for tau(n+1)*tau(n-1)/tau(n)^2, where tau(n) is the number of divisors of n.
|
|
0
| |
|
|
3, 5, 7, 11, 17, 19, 29, 41, 71, 181, 239, 379, 449, 701, 881, 1429, 1871, 2729, 3079, 4159, 10529, 11969, 23561, 40699, 51679, 90271, 104651, 146719, 226799, 244529, 252449, 388961, 403649
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Most terms are primes. These are numbers with few factors which are sandwiched between numbers with many factors. Terms <379 are same as those of A090481.
|
|
|
EXAMPLE
| tau(16)*tau(18)/tau(17)^2 = 5*6/2^2 = 15/2 and this is larger than for any n < 17, so 17 is in the sequence.
|
|
|
MAPLE
| f := x -> tau(x-1)*tau(x+1)/tau(x)^2:?print m := 1: A := []: for k from 2 to 10^6 do if f(k) > m then m := f(k): A := [op(A), [k, f(k)]]: fi; od;
|
|
|
CROSSREFS
| Cf. A090481.
Sequence in context: A194099 A045396 A155779 * A045397 A152998 A108539
Adjacent sequences: A094339 A094340 A094341 * A094343 A094344 A094345
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Isabel C. Lugo (isabel(AT)mit.edu), Jun 04 2004
|
| |
|
|
