A070163 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A070163

Primes arising in A070162(n).

3, 3, 2, 5, 7, 7, 7, 11, 11, 11, 13, 17, 23, 19, 23, 29, 23, 23, 31, 29, 31, 29, 43, 31, 31, 47, 37, 53, 47, 41, 59, 43, 47, 47, 47, 59, 53, 71, 59, 59, 61, 89, 67, 71, 71, 73, 109, 79, 107, 79, 107, 83, 83, 89, 131, 109, 127, 97, 137, 101, 139, 103, 107, 107, 109, 139

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Table of n, a(n) for n=1..66.

FORMULA

a[n]=A070162(n)-A000010(A070162(n))-1=A051953(A070162(n))-1

MATHEMATICA

Do[s=n-EulerPhi[n]-1; If[PrimeQ[s], Print[s]], n, 1, 10000]

CROSSREFS

Cf. A000010, A051953, A070162.

Sequence in context: A143050 A214919 A290599 * A083343 A360736 A292527

Adjacent sequences: A070160 A070161 A070162 * A070164 A070165 A070166

KEYWORD

nonn

AUTHOR

Labos Elemer, Apr 26 2002

STATUS

approved