The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A104492

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A104492

Cube excess of the n-th prime.
(history; published version)

#11 by Harvey P. Dale at Thu Feb 15 13:01:02 EST 2018

STATUS

editing

approved

#10 by Harvey P. Dale at Thu Feb 15 13:00:57 EST 2018

LINKS

Harvey P. Dale, <a href="/A104492/b104492.txt">Table of n, a(n) for n = 1..1000</a>

MATHEMATICA

#-Floor[Surd[#, 3]]^3&/@Prime[Range[80]] (* Harvey P. Dale, Feb 15 2018 *)

STATUS

approved

editing

#9 by N. J. A. Sloane at Sat Jan 17 23:22:27 EST 2015

STATUS

proposed

approved

#8 by Jon E. Schoenfield at Sat Jan 17 20:14:26 EST 2015

STATUS

editing

proposed

#7 by Jon E. Schoenfield at Sat Jan 17 20:14:06 EST 2015

FORMULA

a(n) = A055400(A000040(n)).

a(n) = prime(n) - floor(prime(n)^(1/3))^3. - Jon E. Schoenfield, Jan 17 2015

EXAMPLE

a(48) = 7 because the 48th prime is 223 and 223 - 6^3 = 7, while 223 - 7^3 = -120.

while 223-7^3 = -120.

MATHEMATICA

lst={}; Do[p=Prime[n]; s=p^(1/3); f=Floor[s]; a=f^3; d=p-a; AppendTo[lst, d], {n, 6!}]; lst [From _(* _Vladimir Joseph Stephan Orlovsky_, Mar 11 2009] *)

STATUS

approved

editing

Discussion

Sat Jan 17

20:14

Jon E. Schoenfield: If the additional formula doesn't seem worthwhile, please delete!

#6 by Russ Cox at Sat Mar 31 12:38:10 EDT 2012

MATHEMATICA

lst={}; Do[p=Prime[n]; s=p^(1/3); f=Floor[s]; a=f^3; d=p-a; AppendTo[lst, d], {n, 6!}]; lst [From _Vladimir Joseph Stephan Orlovsky (4vladimir(AT)gmail.com), _, Mar 11 2009]

Discussion

Sat Mar 31

12:38

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

#5 by Russ Cox at Fri Mar 30 18:40:27 EDT 2012

AUTHOR

_Jonathan Vos Post (jvospost3(AT)gmail.com), _, Mar 10 2005

Discussion

Fri Mar 30

18:40

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

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

MATHEMATICA

lst={}; Do[p=Prime[n]; s=p^(1/3); f=Floor[s]; a=f^3; d=p-a; AppendTo[lst, d], {n, 6!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Mar 11 2009]

KEYWORD

easy,nonn,new

#3 by N. J. A. Sloane at Fri Feb 27 03:00:00 EST 2009

EXAMPLE

a(48) = 7 because the 48th prime is 223, and 223 - 6^3 = 7,

KEYWORD

easy,nonn,new

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

KEYWORD

easy,nonn,new

AUTHOR

Jonathan Vos Post (jvospost2jvospost3(AT)yahoogmail.com), Mar 10 2005