|
| |
|
|
A054271
|
|
Difference between prime squares and largest previous prime.
|
|
11
| |
|
|
1, 2, 2, 2, 8, 2, 6, 2, 6, 2, 8, 2, 12, 2, 2, 6, 12, 2, 6, 2, 6, 12, 6, 2, 6, 8, 2, 2, 14, 6, 2, 2, 12, 2, 8, 14, 18, 8, 6, 2, 12, 12, 2, 6, 6, 20, 2, 2, 8, 8, 2, 2, 8, 12, 2, 6, 8, 8, 12, 20, 12, 2, 20, 18, 2, 6, 14, 2, 8, 12, 8, 2, 6, 6, 12, 6, 18, 30, 12, 12, 18, 2, 8, 12, 24, 2, 2, 6, 14, 6
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
LINKS
| Harvey P. Dale, Table of n, a(n) for n = 1..1000
|
|
|
FORMULA
| a(n)=Prime[n]^2 - Max[q], where Max[q] is the largest prime preceding n-th prime-square.
|
|
|
EXAMPLE
| n=4 and p(4)^2=49, preceded by 47 in the minimal distance, 2 so a(4)=2. n=97 and p(97)^2=509^2=259081, just preceded by 259033=p(22765) in a hihgher(=48) distance from the p-square, so a(97)=48.
|
|
|
MATHEMATICA
| f[n_]:=Module[{n2=n^2}, n2-NextPrime[n2, -1]]; f/@Prime[Range[90]] (* From Harvey P. Dale, Oct 19 2011 *)
|
|
|
CROSSREFS
| Cf. A001248, A054270.
Cf. A001248, A054270, A091666, A133517, A133518, A133519, A133520, A133521, A133522, (A001223).
Sequence in context: A137508 A055921 A029605 * A011202 A085484 A116585
Adjacent sequences: A054268 A054269 A054270 * A054272 A054273 A054274
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), May 05 2000
|
| |
|
|
