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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A336673 Numbers k such that A063659(k) = A063659(k+1). 1
3, 49, 1681, 18490, 23762, 656914, 843637, 5606230, 35558770, 46297822, 59006794, 114594493, 132859642, 138852445, 157906534, 289405462, 299441785, 536671282, 813736930, 1175272581, 1276553470, 1655870629, 5086602202, 5429407657, 6549516022, 8645559934, 10373399185 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Analogous to A001274 as A063659 is analogous to Euler's phi function (A000010).

LINKS

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

E. K. Haviland, An analogue of Euler's phi-function, Duke Math. J., Vol. 11 (1944), pp. 869-872.

EXAMPLE

3 is a term since A063659(3) = A063659(4) = 3.

MATHEMATICA

f[p_, e_] := If[e == 1, p, p^e - p^(e-2)]; s[n_] := Times @@ f @@@ FactorInteger[n]; s1 = 1; seq = {}; Do[s2 = s[n]; If[s1 == s2, AppendTo[seq, n-1]]; s1 = s2, {n, 2, 10^5}]; seq

CROSSREFS

Cf. A000010, A063659, A001274.

Sequence in context: A302466 A303248 A187664 * A012199 A337154 A300990

Adjacent sequences:  A336670 A336671 A336672 * A336674 A336675 A336676

KEYWORD

nonn

AUTHOR

Amiram Eldar, Jul 29 2020

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 January 16 14:59 EST 2022. Contains 350376 sequences. (Running on oeis4.)