The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A081638

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

A081638

Class 10+ primes.
(history; published version)

#8 by OEIS Server at Tue Mar 26 07:04:06 EDT 2024

LINKS

R. J. Mathar, <a href="/A081638/b081638_1.txt">Table of n, a(n) for n = 1..360</a>

#7 by R. J. Mathar at Tue Mar 26 07:04:06 EDT 2024

STATUS

editing

approved

Discussion

Tue Mar 26

07:04

OEIS Server: Installed first b-file as b081638.txt.

#6 by R. J. Mathar at Tue Mar 26 07:03:56 EDT 2024

LINKS

R. J. Mathar, <a href="/A081638/b081638_1.txt">Table of n, a(n) for n = 1..360</a>

STATUS

approved

editing

#5 by R. J. Mathar at Mon Jan 13 12:01:48 EST 2014

STATUS

editing

approved

#4 by R. J. Mathar at Mon Jan 13 12:01:43 EST 2014

MAPLE

For Maple program see Mathar link in A005105.

STATUS

approved

editing

#3 by Russ Cox at Fri Mar 30 17:30:54 EDT 2012

AUTHOR

_Robert G. Wilson v (rgwv(AT)rgwv.com), _, Mar 20 2003

Discussion

Fri Mar 30

17:30

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

#2 by N. J. A. Sloane at Fri May 11 03:00:00 EDT 2007

MAPLE

For Maple program see Mathar link.

KEYWORD

nonn,new

nonn

#1 by N. J. A. Sloane at Fri May 16 03:00:00 EDT 2003

NAME

Class 10+ primes.

DATA

1065601, 2424973, 5114881, 7222561, 8124481, 8524091, 8647411, 8650321, 9190681, 9287521, 9590417, 10617601, 10929817, 11996161, 12349093, 12508081, 12786181, 12971117, 13570681, 14113027, 14308123, 14312743, 14476807

OFFSET

1,1

REFERENCES

R. K. Guy, Unsolved Problems in Number Theory, A18.

MATHEMATICA

PrimeFactors[n_Integer] := Flatten[ Table[ #[[1]], {1}] & /@ FactorInteger[n]]; f[n_Integer] := Block[{m = n}, If[m == 0, m = 1, While[ IntegerQ[m/2], m /= 2]; While[ IntegerQ[m/3], m /= 3]]; Apply[Times, PrimeFactors[m] + 1]]; ClassPlusNbr[n_] := Length[ NestWhileList[f, n, UnsameQ, All]] - 3; Prime[ Select[ Range[150000], ClassPlusNbr[ Prime[ # ]] == 10 &]]

CROSSREFS

Cf. A005113, A005105, A005106, A005107, A005108, A081633, A081634, A081635, A081636, A081637, A081639.

KEYWORD

nonn

AUTHOR

Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 20 2003

STATUS

approved