A163082 Primes of the form p$ - 1 where p is prime, where '$' denotes the swinging factorial (A056040).

5, 29, 139, 12011, 5651707681619, 386971244197199, 35257120210449712895193719, 815027488562171580969632861193966578650499

Offset: 1

Author

Peter Luschny, Jul 21 2009

Keywords

• nonn

Comments

The first values of p are 3, 5, 7, 13, 41 from A163080. Subsequence of A163076 (primes of the form k$ - 1).

Examples

			3 and 3$ - 1 = 5 are prime, so 5 is a member.
		

Links

• Jinyuan Wang, Table of n, a(n) for n = 1..14
• Peter Luschny, Die schwingende Fakultät und Orbitalsysteme, August 2011.
• Peter Luschny, Swinging Primes.

Crossrefs

Cf. A056040, A163074-A163083.

Programs

Maple

a := proc(n) select(isprime,[$2..n]); select(isprime, map(x -> A056040(x)-1,%)) end: