login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A083241 a(n)+a(n-1)+a(n-2)+a(n-3)=p[n], the n-th prime if p[n]>3, a(1)=a(2)=a(3)=0;. 0
0, 0, 0, 5, 2, 4, 2, 9, 4, 8, 8, 11, 10, 12, 10, 15, 16, 18, 12, 21, 20 (list; graph; refs; listen; history; internal format)
OFFSET

0,4

FORMULA

A001221[a[n]-A000720[a[n]]]=1 and a[n]-A000720[a[n]] is in A025475.

EXAMPLE

a(3)+a(4)+a(5)+a(6)=5+2+4+2=p[6]=13

MATHEMATICA

Do[s=Prime[n]-n; If[Equal[Length[FactorInteger[s]], 1]&&!PrimeQ[s], Print[Prime[n]]], {n, 1, 100000}]

CROSSREFS

Sequence in context: A181697 A181696 A157121 * A111145 A021660 A064853

Adjacent sequences:  A083238 A083239 A083240 * A083242 A083243 A083244

KEYWORD

nonn

AUTHOR

Labos E. (labos(AT)ana.sote.hu), Apr 24 2003

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 15 19:09 EST 2012. Contains 205852 sequences.