The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A084791 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A084791

Where record gaps between 3-smooth numbers occur.
(history; published version)

#8 by Alois P. Heinz at Thu Jan 30 06:40:59 EST 2020

STATUS

proposed

approved

#7 by Amiram Eldar at Thu Jan 30 06:28:09 EST 2020

STATUS

editing

proposed

#6 by Amiram Eldar at Thu Jan 30 06:04:43 EST 2020

CROSSREFS

Cf. A003586, A084788, A084789, A084790, A084791.

#5 by Amiram Eldar at Thu Jan 30 06:00:50 EST 2020

COMMENTS

A084788(n)=A061987(a(n)), A084789(n)=A003586(a(n)), A084790(n)=A003586(a(n)+1).

FORMULA

A084788(n) = A061987(a(n)).

A084789(n) = A003586(a(n)).

A084790(n) = A003586(a(n) + 1).

MATHEMATICA

s = {}; m = 13; Do[n = 3^k; While[n <= 3^m, AppendTo[s, n]; n*=2], {k, 0, m}]; s = Union[s]; d = Differences@s; v = DeleteDuplicates @ FoldList[Max, d]; Map[First@ Position[d, #] &, v] //Flatten (* Amiram Eldar, Jan 30 2020 *)

CROSSREFS

Cf. A003586, A084788, A084789, A084790, A084791.

#4 by Amiram Eldar at Thu Jan 30 05:59:03 EST 2020

LINKS

Amiram Eldar, <a href="/A084791/b084791.txt">Table of n, a(n) for n = 1..10000</a>

STATUS

approved

editing

#3 by Russ Cox at Fri Mar 30 18:50:35 EDT 2012

AUTHOR

_Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), _, Jun 03 2003

Discussion

Fri Mar 30

18:50

OEIS Server: https://oeis.org/edit/global/246

#2 by N. J. A. Sloane at Fri Jan 09 03:00:00 EST 2009

KEYWORD

nonn,new

nonn

AUTHOR

Reinhard Zumkeller (reinhard.zumkeller(AT)lhsystemsgmail.com), Jun 03 2003

#1 by N. J. A. Sloane at Sat Sep 13 03:00:00 EDT 2003

NAME

Where record gaps between 3-smooth numbers occur.

DATA

1, 4, 7, 8, 10, 14, 19, 21, 24, 28, 29, 30, 34, 35, 36, 38, 39, 41, 42, 43, 45, 46, 50, 51, 53, 54, 58, 59, 63, 67, 68, 72, 78, 82, 88, 99, 110, 113, 115, 118, 120, 122, 125, 127, 133, 135, 138, 140, 146, 148, 154, 160, 162, 168, 175, 176, 177, 183, 190, 191, 192

OFFSET

1,2

COMMENTS

A084788(n)=A061987(a(n)), A084789(n)=A003586(a(n)), A084790(n)=A003586(a(n)+1).

LINKS

Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/SmoothNumber.html">Smooth Number</a>

KEYWORD

nonn

AUTHOR

Reinhard Zumkeller (reinhard.zumkeller(AT)lhsystems.com), Jun 03 2003

STATUS

approved