Position[PrimeQ[Table[ \
184769970321174147430683562020016440301854933866341017147178577491065169671116\
124985933768430543574458561606154457179405222971773252466096064694607124962372\
044202226975675668737842756238950876467844093328515749657884341508847552829818\
672645133986336493190808467199043187438128336350279547028265329780293491615581\
188104984490831954500984839377522725705257859194499387007369575568843693381277\
9613089230392569695253261620823676490316036551371447913932347169566988069 - \
10^n, {n, 1463}]], True]
|