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 A155768 #5 Nov 21 2013 12:49:32 %S A155768 1,2,3,4,11,13,14,16,18,20,21,23,25,82,83,98,100,115,116,117,119,132, %T A155768 133,135,142,147,150,160,162,164,166,717,835,843,933,956,968,970,1055, %U A155768 1062,1066,1076,1088,1090,1092,1093,1166,1167,1179,1190,1191,1199,1202 %N A155768 Indices of primes with digits in strictly decreasing order. %C A155768 Indices of primes in A052014. %C A155768 There are exactly 87 terms: 1,2,3,4,11,13,14,16,18,20,21,23,25,82,83,98,100,115,116,117,119,132,133,135,142,147,150,160,162,164,166,717,835,843,933,956,968,970,1055,1062,1066,1076,1088,1090,1092,1093,1166,1167,1179,1190,1191,1199,1202,1215,1218,7433,7518,7530,7531,8414,8486,8498,8509,8510,8511,9096,9286,9391,9441,9463,9468,9471,9479,61307,68743,69564,76755,77533,77608,77614,587773,587837,649440,656917,5634190,5694444,5694505 %t A155768 Select[Range[1300],And@@Negative[Differences[IntegerDigits[Prime[#]]]]&] (* _Harvey P. Dale_, Nov 24 2011 *) %Y A155768 A052014. %K A155768 base,fini,full,nonn %O A155768 1,2 %A A155768 _Zak Seidov_, Jan 27 2009