|
%I #5 Oct 01 2013 21:35:19
%S 2,3,5,7,11,13,17,19,23,2,31,73,127,179,233,283,353,419,467,3,37,79,
%T 131,181,239,293,359,421,479,5,41,83,137,191,241,307,367,431,487,7,43,
%U 89,139,193,251,311,373,433,491,11,47,97,149,197,257,313,379,439,499,13,53
%N Prime(R(n)) where Prime(i) is the i-th prime and R(n) is the value of the reverse of the digits of n.
%e Rp(17) = 71. Prime(71)= 353.
%o (PARI) g(n) = for(x=1,n,y=revi(prime(x));print1(prime(y)",")) revi(str) = \ Get the integer of the reverse of the input string { local(tmp,s,j); tmp = Vec(Str(str)); s=""; forstep(j=length(tmp),1,-1, s=concat(s,tmp[j])); return(eval(s)) }
%K easy,nonn,base
%O 1,1
%A _Cino Hilliard_, Dec 04 2006
|
