A165852 Totally multiplicative sequence with a(p) = 31.
1, 31, 31, 961, 31, 961, 31, 29791, 961, 961, 31, 29791, 31, 961, 961, 923521, 31, 29791, 31, 29791, 961, 961, 31, 923521, 961, 961, 29791, 29791, 31, 29791, 31, 28629151, 961, 961, 961, 923521, 31, 961, 961, 923521, 31, 29791, 31, 29791, 29791
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[n eq 1 select 1 else 31^(&+[p[2]: p in Factorization(n)]): n in [1..100]]; // Vincenzo Librandi, Apr 14 2016
-
Mathematica
31^PrimeOmega[Range[100]] (* G. C. Greubel, Apr 13 2016 *)
-
PARI
a(n) = 31^bigomega(n); \\ Michel Marcus, Apr 14 2016