Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS").
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics, Centerd Pentagonal Number
MAPLE
A005891 := proc(n) (5*n*(n+1)+2)/2 ; end: for n from 1 to 1000 do c := A005891(n) ; if isprime(c) then printf("%d, ", c) ; fi; od: # R. J. Mathar, Nov 02 2008