%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