login
Powers p^m, m >= 0, of palindromic primes p (A002385).
5

%I #9 May 11 2015 20:55:42

%S 1,2,3,4,5,7,8,9,11,16,25,27,32,49,64,81,101,121,125,128,131,151,181,

%T 191,243,256,313,343,353,373,383,512,625,727,729,757,787,797,919,929,

%U 1024,1331,2048,2187,2401,3125,4096,6561,8192,10201,10301,10501,10601,11311,11411,12421,12721

%N Powers p^m, m >= 0, of palindromic primes p (A002385).

%C Superset of A002385 and A084092. Subset of A192137.

%H M. F. Hasler, <a href="/A192139/b192139.txt">Table of n, a(n) for n = 1..858</a> (all terms up to 10^7).

%o (PARI) A192139=[1]; forprime(p=1,M=1e7, p==A004086(p) && A192139=setunion(A192139,vector(log(M)\log(p),k,p^k))) \\ _M. F. Hasler_, May 11 2015

%Y Cf. A002113, A002385, A084317, A084092, A192137, A192138, A192140, A192141.

%K nonn,base

%O 1,2

%A _Jaroslav Krizek_, Jun 24 2011

%E Missing term 625 inserted and more terms added by _M. F. Hasler_, May 11 2015