OFFSET
1,1
COMMENTS
LINKS
Jinyuan Wang, Table of n, a(n) for n = 1..7
Peter Luschny, Die schwingende Fakultät und Orbitalsysteme, August 2011.
Peter Luschny, Swinging Primes.
EXAMPLE
3 and 3$ + 1 = 7 are prime, so 7 is a member.
MAPLE
a := proc(n) select(isprime, [$2..n]); select(isprime, map(x -> A056040(x)+1, %)) end:
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Jul 21 2009
STATUS
approved