|
Search: id:A088077
|
|
|
| A088077 |
|
a(n) is the least number m sandwiched between m-1 and m+1, both with special properties as follows: both are squarefree; both have n distinct prime factors. |
|
+0
2
|
|
| 4, 34, 664, 18446, 887314, 84946016, 3086525014, 557027507464
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
a(n) is surely larger than the n-th, but seems even larger than the (n+1)-th primorial number.
a(n) is neither necessarily squarefree nor it has a specified number of distinct prime-factors.
|
|
EXAMPLE
|
a(3) = 664, 663 = 3*13*17 and 665 = 5*11*19 both have three prime divisors.
|
|
MATHEMATICA
|
lf[x_] := Length[FactorInteger[x]] am[x_] := Abs[MoebiusMu[x]] q[x_] := Apply[Times, Table[Prime[j], {j, 1, x}]] Table[flag=1; Print["#"]; Do[s1=am[n-1]; s2=am[n+1]; If[Equal[s1, 1]&&Equal[s2, 1]&&Equal[lf[n-1], j] &&Equal[lf[n+1], j]&&Equal[flag, 1], Print[{n, j}]; flag=0], {n, q[j], q[j]+...}], {j, 1, 4}]
|
|
CROSSREFS
|
Cf. A002110, A001221.
Adjacent sequences: A088074 A088075 A088076 this_sequence A088078 A088079 A088080
Sequence in context: A081972 A134354 A030243 this_sequence A113231 A055621 A000860
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Sep 22 2003
|
|
EXTENSIONS
|
Edited by Labos E. (labos(AT)ana.sote.hu), Sep 26 2003
84946016 from Ray Chandler (rayjchandler(AT)sbcglobal.net), Oct 09 2003
a(7) and a(8) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Apr 22 2008
|
|
|
Search completed in 0.002 seconds
|
