A277208 Numbers m such that m-1 = (tau(m-1)-1)^k for some k>=0, where tau(m) is the number of divisors of m (A000005).
2, 5, 17, 28, 3126, 3376, 65537, 823544, 3748097, 52521876
Offset: 1
Examples
3376 is in the sequence because 3375 = (tau(3375)-1)^3 = 15^3.
Programs
-
Magma
Set(Sort([n: n in[2..1000000], k in [0..20] | (n-1) eq (NumberOfDivisors(n-1)-1)^k]));
-
PARI
isok(n) = {if (n==2, return(1)); my(dd = numdiv(n-1) - 1); if (dd > 1, my(k = 1); while(dd^k < n-1, k++); dd^k == n-1;);} \\ Michel Marcus, Oct 11 2016
Extensions
a(9)-a(10) from Michel Marcus, Oct 11 2016
Comments