cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A261511 Twin primes with both terms having distinct digits in descending order.

This page as a plain text file.
%I A261511 #26 Aug 31 2015 10:19:36
%S A261511 3,5,7,41,43,71,73,641,643,76541,76543,87641,87643
%N A261511 Twin primes with both terms having distinct digits in descending order.
%C A261511 Numbers in this list are the pairs of twin primes listed in A052014 with both terms having distinct digits in descending order
%t A261511 dsc[n_] := 0 > Max@ Differences@ IntegerDigits@n; Union@ Flatten@ Select[ Partition[ Prime@ Range@ 9000, 2, 1], #[[2]] - #[[1]] == 2 && And @@ dsc /@ # &] (* _Giovanni Resta_, Aug 26 2015 *)
%o A261511 (PARI) lista(nn=100000) = {v = []; forprime(p=2, nn, if (isprime(p+2) && (d=digits(p)) && (vecsort(d,,12)==d) && (dd=digits(p+2)) && (vecsort(dd,,12)==dd), v = concat(v, p); v = concat(v,p+2));); vecsort(v,,8);} \\ _Michel Marcus_, Aug 23 2015
%Y A261511 Cf. A001097, A052014.
%K A261511 nonn,easy,fini,full,base
%O A261511 1,1
%A A261511 _Paolo Omodei-Zorini_, Aug 22 2015