[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

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

Showing all changes.
Numbers n such that n-LargestCube is prime, (LargestCube <= n).
(history; published version)
#6 by Harvey P. Dale at Wed May 31 15:08:20 EDT 2017
STATUS

editing

approved

#5 by Harvey P. Dale at Wed May 31 15:08:16 EDT 2017
LINKS

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

MATHEMATICA

Select[Range[300], PrimeQ[#-Floor[Surd[#, 3]]^3]&] (* Harvey P. Dale, May 31 2017 *)

STATUS

approved

editing

#4 by Charles R Greathouse IV at Mon May 22 12:15:58 EDT 2017
STATUS

editing

approved

#3 by Charles R Greathouse IV at Mon May 22 12:15:56 EDT 2017
COMMENTS

3-1^3=2, 4-1^3=3,..10-2^3=2, 11-2^3=3,..,29-3^3=2,..

EXAMPLE

3-1^3=2, 4-1^3=3, ..., 10-2^3=2, 11-2^3=3, ..., 29-3^3=2, ....

PROG

(PARI) is(n)=isprime(n - sqrtnint(n, 3)) \\ Charles R Greathouse IV, May 22 2017

CROSSREFS
STATUS

approved

editing

#2 by Russ Cox at Sat Mar 31 12:38:36 EDT 2012
AUTHOR

_Vladimir Joseph Stephan Orlovsky (4vladimir(AT)gmail.com), _, Apr 27 2010

Discussion
Sat Mar 31
12:38
OEIS Server: https://oeis.org/edit/global/876
#1 by N. J. A. Sloane at Tue Jun 01 03:00:00 EDT 2010
NAME

Numbers n such that n-LargestCube is prime, (LargestCube <= n).

DATA

3, 4, 6, 10, 11, 13, 15, 19, 21, 25, 29, 30, 32, 34, 38, 40, 44, 46, 50, 56, 58, 66, 67, 69, 71, 75, 77, 81, 83, 87, 93, 95, 101, 105, 107, 111, 117, 123, 127, 128, 130, 132, 136, 138, 142, 144, 148, 154, 156, 162, 166, 168, 172, 178, 184, 186, 192, 196, 198, 204

OFFSET

1,1

COMMENTS

3-1^3=2, 4-1^3=3,..10-2^3=2, 11-2^3=3,..,29-3^3=2,..

MATHEMATICA

lst={}; Do[p=n-Floor[n^(1/3)]^3; If[PrimeQ[p], AppendTo[lst, n]], {n, 6!}]; lst

CROSSREFS
KEYWORD

nonn,new

AUTHOR

Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 27 2010

STATUS

approved