A155768 Indices of primes with digits in strictly decreasing order.

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

Offset

1,2

Comments

Indices of primes in A052014.

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

Links

Table of n, a(n) for n=1..53.

Mathematica

Select[Range[1300], And@@Negative[Differences[IntegerDigits[Prime[#]]]]&] (* Harvey P. Dale, Nov 24 2011 *)

Crossrefs

A052014.

Sequence in context: A160914 A376201 A326377 * A138985 A184806 A176541

Adjacent sequences: A155765 A155766 A155767 * A155769 A155770 A155771

Keyword

base,fini,full,nonn

Author

Zak Seidov, Jan 27 2009

Status

approved