%I A064988
%S A064988 1,3,5,9,11,15,17,27,25,33,31,45,41,51,55,81,59,75,67,99,85,93,83,135,
%T A064988 121,123,125,153,109,165,127,243,155,177,187,225,157,201,205,297,179,
%U A064988 255,191,279,275,249,211,405,289,363,295,369,241,375,341,459,335,327
%N A064988 Multiplicative with a(p^e) = ithprime(p)^e.
%H A064988 Harry J. Smith, <a href="b064988.txt">Table of n, a(n) for n=1,...,1000</
               a>
%e A064988 a(12)=a(2^2*3)=ithprime(2)^2*ithprime(3)=3^2*5=45.
%o A064988 (PARI) { for (n=1, 1000, f=factor(n)~; a=1; for (i=1, length(f), a*=prime(f[1, 
               i])^f[2, i]); write("b064988.txt", n, " ", a) ) } [From Harry J. 
               Smith (hjsmithh(AT)sbcglobal.net), Oct 02 2009]
%Y A064988 Sequence in context: A071156 A076610 A069205 this_sequence A166699 A052092 
               A075991
%Y A064988 Adjacent sequences: A064985 A064986 A064987 this_sequence A064989 A064990 
               A064991
%K A064988 mult,nonn
%O A064988 1,2
%A A064988 Vladeta Jovovic (vladeta(AT)eunet.rs), Oct 30 2001