1,4

Michael De Vlieger, Table of n, a(n) for n = 1..10000

a(n) = ppp(n) mod n = A038850(n) mod n.

MapIndexed[Mod[#1, First@ #2] &, Nest[Prime, Range@ 79, 3]] (* Michael De Vlieger, Jul 22 2017 *)

Cf. A006450, A038580, A049090, A049203, A049202, A057809, A076240, A076241, A076242.

Sequence in context: A307775 A239680 A128076 * A140061 A292776 A061313

Adjacent sequences: A076240 A076241 A076242 * A076244 A076245 A076246

nonn

Labos Elemer, Oct 08 2002

approved