A078843: A better (best) PARI code

[zak seidov]

Dear PARI gurus,

can anyone please 

write PARI code for EWW/RGWV formulas and MATHEMATICA
code in  A078843? 
 
My newbie PARI level allows me only to suggest i.o.f.

%o A078843 (PARI)
a(n)=sum(i=1,3^n,if(bigomega(i)-n,0,1)) 

a shorter (faster?) one:

a(n) = sum(i=2^n,3^n,bigomega(i)) 

but for larger n's it is yet not fast.

Thanks a lot,
zak

PS 
My current additional terms in A078843:
{n,A078843(n)}
{38,37932129}
{39,58110457}
{40,88981343}
{41,136192537}
{42,208364721}
{43,318653143}
{44,487128905}
{45,744398307}
{46,1137129971}


      ____________________________________________________________________________________
Never miss a thing.  Make Yahoo your home page. 
http://www.yahoo.com/r/hs