Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A083241
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
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
1
0, 0, 0, 5, 2, 4, 2, 9, 4, 8, 8, 11, 10, 12, 10, 15, 16, 18, 12, 21, 20 (list; graph; listen)
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: A073943 A019901 A157121 this_sequence A111145 A021660 A064853

Adjacent sequences: A083238 A083239 A083240 this_sequence A083242 A083243 A083244

KEYWORD

nonn

AUTHOR

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

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified December 20 16:54 EST 2009. Contains 171081 sequences.


AT&T Labs Research