A081258 -id:A081258 - cp's OEIS frontend

A081256 Greatest prime factor of n^3 + 1.

2, 3, 7, 13, 7, 31, 43, 19, 73, 13, 37, 19, 157, 61, 211, 241, 13, 307, 7, 127, 421, 463, 13, 79, 601, 31, 37, 757, 271, 67, 19, 331, 151, 1123, 397, 97, 43, 67, 1483, 223, 547, 1723, 139, 631, 283, 109, 103, 61, 181, 43, 2551, 379, 919, 409, 2971, 79, 103, 3307, 163

Offset: 1

Jan Fricke, Mar 14 2003

Record values appear to match the terms of A002383 for n>1. - Bill McEachen, Oct 18 2023

R. J. Mathar and T. D. Noe, Table of n, a(n) for n = 1..10000 (first 5000 terms from R. J. Mathar)
J. Buchmann, K. Győry, M. Mignotte, and N. Tzanakis, Lower bounds for P(x^3+k), an elementary approach, Publ. Math. Debrecen, Vol. 38, No. 1-2 (1991), pp. 145-163.

Cf. A081257, A081258, A096173, A096174.

Cf. A006530, A001093, A002383, A014442, A096172.

A081256 := proc(n)
    A006530(n^3+1) ;
end proc:
seq(A081256(n),n=1..20) ; # R. J. Mathar, Feb 13 2014

Table[Max[Transpose[FactorInteger[n^3 + 1]][[1]]], {n, 25}]

a(n)=my(f=factor(n^3+1)); f[#f~,1] \\ Charles R Greathouse IV, Mar 08 2017

A081256(n)=vecmax(factor(n^3+1)[,1]) \\ It seems slightly slower to get the last element using ...[-1..-1][1]. - M. F. Hasler, Jun 15 2018

a(n) = A006530(A001093(n)). - M. F. Hasler, Jun 13 2018

a(n) >= 31 for n >= 70 (Buchmann et al., 1991). - Amiram Eldar, Oct 25 2024

More terms from Harvey P. Dale, Mar 22 2003

More terms from Hugo Pfoertner, Jun 20 2004

A081257 a(n) is the greatest prime factor of (n^3 - 1).

Original entry on oeis.org

7, 13, 7, 31, 43, 19, 73, 13, 37, 19, 157, 61, 211, 241, 13, 307, 17, 127, 421, 463, 13, 79, 601, 31, 37, 757, 271, 67, 29, 331, 151, 1123, 397, 97, 43, 67, 1483, 223, 547, 1723, 139, 631, 283, 109, 103, 61, 181, 43, 2551, 379, 919, 409, 2971, 79, 103, 3307, 163

Offset: 2

Jan Fricke, Mar 14 2003

The record values here (as well as those for A081256) appear to match the terms of A002383 for n > 1. - Bill McEachen, Jun 19 2023

			a(7)=19 because 7^3 - 1 = 342 = 2*3*3*19.

Jon E. Schoenfield, Table of n, a(n) for n = 2..10000 (first 999 terms from R. J. Mathar).

Cf. A081256, A081258, A002383.

Cf. A096175 (n^3-1 is an odd semiprime), A096176 ((n^3-1)/(n-1) is prime).

A081257 := proc(n)
        A006530( n^3-1) ;
end proc: # R. J. Mathar, Jul 18 2015

FactorInteger[#][[-1,1]]&/@(Range[2,60]^3-1) (* Harvey P. Dale, Oct 09 2017 *)

a(n)=my(f=factor(n^3-1)); f[#f~,1] \\ Charles R Greathouse IV, Mar 08 2017

from sympy import primefactors
def A081257(n): return max(primefactors(n-1)+primefactors(n*(n+1)+1)) # Chai Wah Wu, Oct 15 2022

a(n) = A006530(A068601(n)). - Michel Marcus, Jun 19 2023

More terms from Hugo Pfoertner, Jun 21 2004

cp's OEIS Frontend

A081256 Greatest prime factor of n^3 + 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Maple

Mathematica

PARI

PARI

Formula

Extensions

A081257 a(n) is the greatest prime factor of (n^3 - 1).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Python

Formula

Extensions