(Translated by https://www.hiragana.jp/)
The On-Line Encyclopedia of Integer Sequences (OEIS)
login

Revision History for A139083

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
a(n) = (smallest prime-power among the largest powers of each prime dividing n) + (smallest prime-power among the largest powers of each prime dividing (n+1)).
(history; published version)
#7 by Charles R Greathouse IV at Wed Apr 09 10:14:06 EDT 2014
AUTHOR

Leroy Quet , Apr 07 2008

Discussion
Wed Apr 09
10:14
OEIS Server: https://oeis.org/edit/global/2148
#6 by N. J. A. Sloane at Wed Feb 05 20:18:46 EST 2014
AUTHOR

_Leroy Quet _ Apr 07 2008

Discussion
Wed Feb 05
20:18
OEIS Server: https://oeis.org/edit/global/2118
#5 by Russ Cox at Fri Mar 30 17:35:23 EDT 2012
FORMULA

a(n) = A034684(n) + A034684(n+1) [From _Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), _, Apr 09 2009]

PROG

Contribution from _Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), _, Apr 09 2009: (Start)

EXTENSIONS

More terms from _Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), _, Apr 09 2009

Discussion
Fri Mar 30
17:35
OEIS Server: https://oeis.org/edit/global/165
#4 by N. J. A. Sloane at Sat Oct 02 03:00:00 EDT 2010
LINKS

Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> (listed in lieu of email address)

KEYWORD

nonn,new

nonn

#3 by N. J. A. Sloane at Tue Jun 01 03:00:00 EDT 2010
DATA

3, 5, 7, 9, 7, 9, 15, 17, 11, 13, 14, 16, 15, 5, 19, 33, 19, 21, 23, 7, 5, 25, 26, 28, 27, 29, 31, 33, 31, 33, 63, 35, 5, 7, 9, 41, 39, 5, 8, 46, 43, 45, 47, 9, 7, 49, 50, 52, 51, 5, 7, 57, 55, 7, 12, 10, 5, 61, 62, 64, 63, 9, 71, 69, 7, 69, 71, 7, 5, 73, 79, 81, 75, 5, 7, 11, 9, 81

FORMULA

a(n) = A034684(n) + A034684(n+1) [From Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), Apr 09 2009]

PROG

Contribution from Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), Apr 09 2009: (Start)

(PARI) minpp(n)=local(m, r, pp); if(n==1, 1, m=factor(n); r=m[1, 1]^m[1, 2]; for(i=2, matsize(m)[1], pp=m[i, 1]^m[i, 2]; if(pp<r, r=pp)); r)

vector(80, i, minpp(i)+minpp(i+1)) (End)

KEYWORD

more,nonn,new

nonn

EXTENSIONS

More terms from Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), Apr 09 2009

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

Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a> (listed in lieu of email address)

KEYWORD

more,nonn,new

AUTHOR

Leroy Quet (qq-quet(AT)mindspring.com), Apr 07 2008

#1 by N. J. A. Sloane at Sun Jun 29 03:00:00 EDT 2008
NAME

a(n) = (smallest prime-power among the largest powers of each prime dividing n) + (smallest prime-power among the largest powers of each prime dividing (n+1)).

DATA

3, 5, 7, 9, 7, 9, 15, 17, 11, 13, 14, 16, 15, 5, 19, 33, 19, 21, 23, 7

OFFSET

1,1

COMMENTS

The largest powers of each prime dividing 44 are 2^2 and 11^1. The least of these is 2^2 =4. The largest powers of each prime dividing 45 are 3^2 and 5^1. The least of these is 5^1 = 5. So a(44) = 4 + 5 = 9.

CROSSREFS
KEYWORD

more,nonn

AUTHOR

Leroy Quet (qq-quet(AT)mindspring.com), Apr 07 2008

STATUS

approved