%I A072950
%S A072950 0,0,3,19,107,691,4929,39958,361114,3617842,39839167,478446607
%N A072950 Number of permutations p of (1,2,3,...,n) such that at least one value 
               of abs(k-p(k))) is prime.
%o A072950 (PARI) a(n)=sum(k=1,n!,if(sum(i=1,n,isprime(abs(i-component(numtoperm(n,
               k)),i))),1,0))
%Y A072950 Sequence in context: A095120 A151539 A089164 this_sequence A130425 A103005 
               A162354
%Y A072950 Adjacent sequences: A072947 A072948 A072949 this_sequence A072951 A072952 
               A072953
%K A072950 more,nonn
%O A072950 1,3
%A A072950 Benoit Cloitre (benoit7848c(AT)orange.fr), Aug 20 2002
%E A072950 More terms from Ryan Propper (rpropper(AT)stanford.edu), Jul 21 2006
%E A072950 Definition corrected by Franklin T. Adams-Watters, Dec 07 2006