cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A357325 a(n) is the unique number m such that A034460(m) = A357324(n).

This page as a plain text file.
%I A357325 #11 Sep 28 2022 03:53:16
%S A357325 6,15,21,35,250,138,4192,10048,6112,748,20736,5968,802,12256,41728,
%T A357325 3592,498,53632,8656,80128,2284,2308,36352,2372,10288,5272,11728,
%U A357325 84352,1594,630,6472,48448,6616,50368,1426,1762,102016,172288,32416,8872,2328,9544,19408
%N A357325 a(n) is the unique number m such that A034460(m) = A357324(n).
%H A357325 Amiram Eldar, <a href="/A357325/b357325.txt">Table of n, a(n) for n = 1..10000</a>
%F A357325 A034460(a(n)) = A357324(n).
%t A357325 us[1] = 0; us[n_] := Times @@ (1 + Power @@@ FactorInteger[n]) - n; m = 1500; v = s = Table[0, {m}]; Do[u = us[k]; If[2 <= u <= m, v[[u]]++; s[[u]] = k], {k, 1, m^2}]; s[[Position[v, 1] // Flatten]]
%Y A357325 The unitary version of A357313.
%Y A357325 Cf. A034460, A057709, A357324.
%K A357325 nonn
%O A357325 1,1
%A A357325 _Amiram Eldar_, Sep 24 2022