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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A181428 a(n) = prime(n+2) + prime(n+1) - prime(n). 2
6, 9, 13, 17, 19, 23, 25, 33, 37, 39, 47, 47, 49, 57, 65, 67, 69, 77, 77, 81, 89, 93, 103, 109, 107, 109, 113, 115, 131, 145, 141, 145, 151, 161, 159, 169, 173, 177, 185, 187, 193, 203, 199, 203, 213, 235, 239, 233, 235, 243, 247, 253, 267, 269, 275, 277, 279, 287, 287, 295, 317, 325, 317, 319, 335, 351, 353 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

MAPLE

A181428 := proc(n)

    ithprime(n+1)-ithprime(n)+ithprime(n+2) ;

end proc:

seq(A181428(n), n=1..80) ; # R. J. Mathar, Sep 10 2016

MATHEMATICA

#[[3]]+#[[2]]-#[[1]]&/@Partition[Prime[Range[100]], 3, 1]  (* Harvey P. Dale, Feb 01 2011 *)

ListConvolve[{1, 1, -1}, Prime[Range[100]]]

PROG

(PARI) first(n)=my(v=primes(n+2)); for(k=1, n, v[k]=v[k+2]+v[k+1]-v[k]); v[1..n] \\ Charles R Greathouse IV, Feb 23 2017

CROSSREFS

Sequence in context: A064799 A236763 A030499 * A171575 A186524 A315963

Adjacent sequences:  A181425 A181426 A181427 * A181429 A181430 A181431

KEYWORD

nonn

AUTHOR

Amir H. Farrahi, Jan 29 2011

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 18 09:40 EDT 2019. Contains 327168 sequences. (Running on oeis4.)