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.

A175050 Positive integers n where both n and the number of divisors of n are perfect powers. (Both n and d(n) are elements of A001597.)

This page as a plain text file.
%I A175050 #10 Nov 24 2017 17:33:38
%S A175050 1,8,27,36,100,125,128,196,216,225,256,343,441,484,676,900,1000,1089,
%T A175050 1156,1225,1296,1331,1444,1521,1764,2116,2187,2197,2304,2601,2744,
%U A175050 3025,3249,3364,3375,3844,4225,4356,4761,4900,4913,5476,5929,6084,6400,6561
%N A175050 Positive integers n where both n and the number of divisors of n are perfect powers. (Both n and d(n) are elements of A001597.)
%H A175050 Michael De Vlieger, <a href="/A175050/b175050.txt">Table of n, a(n) for n = 1..10000</a>
%e A175050 128 has 8 divisors. Since 128 is a perfect power (128 = 2^7), and since 8 is also a perfect power (8 = 2^3), then 128 is in this sequence.
%t A175050 Block[{nn = 10^4, s}, s = Union@ Flatten@ Table[n^e, {e, Prime@ Range@ PrimePi@ Log2@ nn}, {n, nn^(1/e)}]; Select[s, MemberQ[s, DivisorSigma[0, #]] &]] (* _Michael De Vlieger_, Nov 24 2017, after _T. D. Noe_ at A001597 *)
%Y A175050 Cf. A001597, A175051.
%K A175050 nonn
%O A175050 1,2
%A A175050 _Leroy Quet_, Dec 08 2009
%E A175050 Extended by _Ray Chandler_, Dec 10 2009