login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A280450 Smallest k > 2n+1 such that phi(k) = phi(2n+1). 1
4, 8, 9, 14, 22, 21, 16, 32, 27, 26, 46, 33, 38, 58, 62, 44, 39, 57, 45, 55, 49, 52, 94, 86, 64, 106, 75, 63, 118, 77, 74, 104, 134, 92, 142, 91, 82, 93, 158, 162, 166, 128, 116, 115, 95, 99, 111, 119, 122, 125, 206, 112, 214, 133, 117, 145, 178, 135, 153, 242 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

All terms are composite.

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

FORMULA

2n+1 < a(n) < 4n+3.

From Robert Israel, Jan 03 2017: (Start)

a(n)=2n+2 if and only if 2n+1 is in A001274.

If n > 3 is in A005384, then a(n)=4n+2. (End)

MAPLE

f:= n -> min(select(`>`, numtheory:-invphi(numtheory:-phi(2*n+1)), 2*n+1)):

map(f, [$1..100]); # Robert Israel, Jan 03 2017

MATHEMATICA

Table[k = 2 n + 2; While[EulerPhi@ k != #, k++] &@ EulerPhi[2 n + 1]; k, {n, 120}] (* Michael De Vlieger, Jan 03 2017 *)

PROG

(PARI) a(n) = my(k=2*n+2); while(eulerphi(k)!=eulerphi(2*n+1), k++); k \\ Felix Fröhlich, Jan 05 2017

CROSSREFS

Cf. A000010, A001274, A005384, A140141.

Sequence in context: A182491 A281686 A122785 * A137055 A078177 A023886

Adjacent sequences:  A280447 A280448 A280449 * A280451 A280452 A280453

KEYWORD

nonn

AUTHOR

Thomas Ordowski, Jan 03 2017

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 24 04:25 EDT 2019. Contains 323528 sequences. (Running on oeis4.)