A332241 Indices of A224078(n) in A025487.

2, 4, 6, 13, 17, 27, 55, 67, 138, 264, 314, 406, 582, 1046, 1835, 3609, 16371, 75611, 118893, 342363

Offset

1,1

Comments

A224078: Superior highly composite numbers that are colossally abundant. Such numbers are also found in A025487.

Finite and full, since A224078 is finite with 20 terms.

Links

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

Mathematica

Block[{s = TakeWhile[Import["https://oeis.org/A025487/b025487.txt", "Data"], Length@ # > 0 &][[All, -1]], t = Map[ToExpression[StringSplit[#][[1, -1]] ] &, Rest@ StringSplit[Import["https://oeis.org/A224078/b224078.txt", "Data"], "\n"]]}, Reap[Do[Which[Length@ t == 0, Break[], First[t] == s[[i]], t = Rest@ t; Sow[i]], {i, Length@ s}]][[-1, -1]]]

Crossrefs

Cf. A002201, A004490, A025487, A224078.

Sequence in context: A376644 A376533 A058598 * A319110 A278031 A087549

Adjacent sequences: A332238 A332239 A332240 * A332242 A332243 A332244

Keyword

nonn,fini,full

Author

Michael De Vlieger, Feb 07 2020

Status

approved