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.

A301315 Multiplicative with a(p^e) = prime(p) ^ a(e) (where prime(k) denotes the k-th prime number).

This page as a plain text file.
%I A301315 #11 Mar 20 2018 04:10:15
%S A301315 1,3,5,27,11,15,17,243,125,33,31,135,41,51,55,7625597484987,59,375,67,
%T A301315 297,85,93,83,1215,1331,123,3125,459,109,165,127,177147,155,177,187,
%U A301315 3375,157,201,205,2673,179,255,191,837,1375,249,211,38127987424935,4913,3993
%N A301315 Multiplicative with a(p^e) = prime(p) ^ a(e) (where prime(k) denotes the k-th prime number).
%C A301315 This sequence is a recursive version of A064988.
%C A301315 This sequence is injective (all terms are distinct).
%H A301315 Rémy Sigrist, <a href="/A301315/b301315.txt">Table of n, a(n) for n = 1..10000</a>
%F A301315 A225395(a(n)) = n.
%F A301315 A279690(a(n)) = A279690(n).
%t A301315 Fold[Function[{a, n}, Append[a, Times @@ Map[Prime[#1]^a[[#2]] & @@ # &, FactorInteger@ n]]], {1}, Range[2, 50]] (* _Michael De Vlieger_, Mar 19 2018 *)
%o A301315 (PARI) a(n) = my (f=factor(n)); prod (i=1, #f~, prime(f[i,1])^a(f[i,2]))
%Y A301315 Cf. A064988, A225395, A279690.
%K A301315 nonn,mult
%O A301315 1,2
%A A301315 _Rémy Sigrist_, Mar 18 2018