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.
%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