A362666 -id:A362666 - cp's OEIS frontend

A362667 Infinitary sparsely totient numbers: numbers k such that m > k implies iphi(m) > iphi(k), where iphi is the infinitary totient function A091732.

2, 6, 8, 10, 24, 30, 42, 54, 56, 66, 120, 168, 216, 264, 270, 312, 330, 384, 408, 456, 480, 510, 552, 840, 1080, 1320, 1560, 1920, 2040, 2280, 2376, 2760, 3000, 3192, 3480, 3720, 3864, 4440, 4920, 5160, 5208, 5640, 7560, 9240, 10920, 11880, 13440, 14280, 15960

Offset: 1

Amiram Eldar, Apr 29 2023

nonn

Amiram Eldar, Table of n, a(n) for n = 1..300

The infinitary version of A036913.
Record values of A362666.
Cf. A091732, A362484, A362668.

s[n_] := If[(inv = invIPhi[n]) == {}, 0, Max[inv]]; seq[kmax_] := Module[{v = {}, s1, sm = 0}, Do[s1 = s[k]; If[s1 > sm, sm = s1; AppendTo[v, s1]], {k, 1, kmax}]; v]; seq[3000] (* using the function invIPhi from A362484 *)

A362668 a(n) = A091732(A362667(n)).

Original entry on oeis.org

1, 2, 3, 4, 6, 8, 12, 16, 18, 20, 24, 36, 48, 60, 64, 72, 80, 90, 96, 108, 120, 128, 132, 144, 192, 240, 288, 360, 384, 432, 480, 528, 576, 648, 672, 720, 792, 864, 960, 1008, 1080, 1104, 1152, 1440, 1728, 1920, 2160, 2304, 2592, 2880, 3072, 3168, 3456, 3600, 3840

Offset: 1

Amiram Eldar, Apr 29 2023

nonn

Amiram Eldar, Table of n, a(n) for n = 1..300

The infinitary version of A036912.
Indices of records of A362666.
Cf. A091732, A362484, A362667.

s[n_] := If[(inv = invIPhi[n]) == {}, 0, Max[inv]]; seq[kmax_] := Module[{v = {}, s1, sm = 0}, Do[s1 = s[k]; If[s1 > sm, sm = s1; AppendTo[v, k]], {k, 1, kmax}]; v]; seq[4000] (* using the function invIPhi from A362484 *)

cp's OEIS Frontend

A362667 Infinitary sparsely totient numbers: numbers k such that m > k implies iphi(m) > iphi(k), where iphi is the infinitary totient function A091732.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica