A random 2000-digit emirp pair

Print[DateString[]];
c=0; While[c++; PrimeQ[IntegerReverse[r=RandomPrime[{10^1999,2*10^1999}]]]==False];
Print[{DateString[], c}]; r

Mon 23 Mar 2026 16:19:04

{Mon 23 Mar 2026 18:37:09, 305}

14855218387530938731264800899806518554251409448753318067281617721104517975019660570816502191121802141387619791604557638640603077054520997318307203718761757739257990957393586487037638214729490346907077085366489735302991920794042479840185960548800113792237378778189700214336498150535494706550605947647886952709343445154850786791334376804237058351294799668452160206131345032141325576891497636422462012076224432607954324056613347607288129441043897934814166919553140730183934337952784895386915184278773673374499327984879217657567333750360009291505056111578053084511773793397248168145190194638081779158080985373127557284411266286462358754778798450217253924795704562031795767586150594858361787012654211320033792723983297048174107728830987370130777266997038517867493302588134280307951436792574170079530221417396081625730302595728237532318481405855540975409890906976902320267307459218191770761431037983144020890302946754575512111129239578508080696921714584513835630889334839362187530001616420174589110874531666851407830633657753457085270606608334710585505853591828745779378101187982074326317494916222176946818501389870085531903573860851057307085813978075441446820544507426572075052156092931837527279166150509917972776167153657340031646179631733906184205918255895475754364175238057482645899534235102077183676796749323690141704894319808779172119291942162868677765137547565809194418652476017816016763486268007290212946536413065587272480288193061788482406655351702586154143963745149534333768316994754590468906962685037527510130840705726077739498669858651281009519862797180044407205030051742292526137434721833180012034655794438599828098375237119761007728650703770787960212849241788574933755087711157262236337487014829313684940715849983628697605605634086992019999606613109048737110152003061306410080888361354585657807374315692388968946536330992803388106574848702486355828678460394253967147711575515270818557921500146950778382811866201918398021331397625888200120115790700195112386497426010970976957364112704151652043

IntegerReverse[r]

34025615140721146375967907901062479468321159100709751102100288852679313312089381910266811828387705964100512975581807251557511774176935249306487682855368420784847560188330829903363564986988329651347370875658545316388808001460316030025101173784090131660699991029968043650650679682638994851704948631392841078473363226275111778055733947588714294821206978707730705682770016791173257389082899583449755643021008133812743473162529224715003050270444008179726891590018215685896689493777062750704803101572573058626960986409545749961386733343594154736934145168520715355660428488716039188208427278556031463564921209270086268436761061871067425681449190856574573156777686826124919291127197780891349840714109632394769767638177020153243599854628475083257146345757459855281950248160933713697164613004375635176167727971990505166197272573813929065125057027562470544502864414457087931858070375015806837530913558007898310581864967122261949471362347028978110187397754782819535850558501743380660607258075435775633603870415866613547801198547102461610003578126393843398803653831548541712969608080587593292111121557545764920309802044138973013416707719181295470376202320967960909890457904555850418481323573282759520303752618069371412203597007147529763415970308243188520339476871583079966277703107378903882770147184079238932729733002311245621078716385849505168576759713026540759742935271205489787745785326468266211448275572137358908085197718083649109154186184279339737711548035087511165050519290006305733376575671297848972399447337637787248151968359848725973343938103704135591966141843979834014492188270674331665042345970623442267021026422463679419867552314123054313160206125486699749215385073240867343319768705845154434390725968874674950605560749453505189463341200798187787373229731100884506958104897424049702919920353798466358077070964309492741283673078468539375909975293775716781730270381379902545077030604683675540619791678314120812119120561807506691057971540112771618276081335784490415245581560899800846213783903578381255841

Click on either number to check its primality.