[seqfan] Re: Binary Complement Sequences

[Hans Havermann]

Tim: "... in my code that's the first 'jaw dropping' starting value, taking 120,796,790 steps to reach 0 ..."
Tom: "22246 reaches zero after 120796790 steps. (Took about 36 seconds to run.)"

Thank you both. In Mathematica...


flip[n_]:=FromDigits[BitXor[1,IntegerDigits[3*n,2]],2]

Print[DateString[]];g=NestList[flip,22246,120796790];Print[DateString[]];
Mon 19 Dec 2022 10:14:51
Mon 19 Dec 2022 12:27:21

PositionSmallest[g]-1
{120796790}

PositionLargest[g]-1
{49101525}

Max[g]
937540576654532994658493058751872758599932767394888109549592826368930855817443051029009363284696407761357666544510707366906549739917220380315520238427967443543370764009589574152482619625165097114363404251131311697496242938576906086151625333626291937206867276554801081540151956543158289261582314061110052320125328455229440432617827853228553328833622550840037249964231014601215432511923910632694113320167197444715258234341323177660775225920383481504919290454133430657399631822673602569982276070983627499359398236601600891397677523434539635718607671492450533176397935944438423176030448130414792134380049885590990115593755202027540124699084218343384098351242857556925597806398849672358617802579722621287426972668910278433477761514869016042550514848369342458957284299663987576659192170352836577680408267666444914091447779670097597397821331676433273875312885295562921707855305841847566014844180154886016512987375096726110524835085898142744895361703163814783072605272133672286858012576289628999947832764552299580183861909377131796414180318166741782043782213063940382474687115703226303904352543610789646400779858793004902162826314773747546494983218098285500238314441346705576883189360350675355224346363730636086868689924818145113318293363053558269685263204242050499853457855615133840260482078800672174208264964306668349934631283445137033460378288363242407671921755477311648378957065339744386838600350380814426256149005755202678369264617540994162525231540978912677437808609909145562740943352610816903874102940795007711133992341900127948642805488402680410832137378182974222633534203653555238181913484239392517601541941868440564382248858972180705777165798615237535661279774568739714531492090707726365019240661199050395247119705419537506705038949805696537269035913297735817989405511102485462611587060990090386012845667314532117494084535690943672147550680539879141609782812261134686672072703724288129221699046954563106406371063525048418111781359417499281528064556099965361734500768629367641186440711329333396997487313127008740965412314257172072650839190013535606613546011512159217657552204394284158379443044673249905792843605516101806187233228794837980862196664961389727041446524181102156068151290710525818916158794820569659098727764788723816303058706635008210424437739941098796775196764032886590201686424249003362815803738845816414042350067892788860627825674319509706205407605808624930814990680876913205224726965334163310939309447217731275737441392683768864252281324836013363907112273206693672293542216586205673197904998103386950714604391012633601561389994256227221518905852614894294779759070190754833442247572174988799107644415382169491134639716669296998119273321532745182418468104701464305126222219192515327797157692212882619271315731321452586352170237105634881726904968355114953654434029311159980647312211369110359402160331540992601119243924142443644632526889901158207257590228511228686181052373457286992203669200067063687696133347925354007994712483448013297813895693397616224167560535271427546745198430791001698864929681628167442733335828159606952123474260973309357271020296377121106388335293991126887054308583215290807350792819710134033002204823123905633013276637364564117162500902334264751553371480612665708942356193913401721976821809877054169960332760923619043080723182794201473657831862968589348350675431631803858934983802118093533282580125262960933501182265307086670874384106598024292597800779596060038655997603716663729727055306973057403230616908712927855280971017999095719236541718356890234540042380702993833000575161078015629454729626283179183028017860121566216270581796074862829398066617792747483880676673695203334916800123388656069186704233103111934790144689783113016673390663902935925488511802463164383291539433245168126925403841215885110521630636692915923555624928012215505534061772002686849872982206099940596164184974602753873950574676147355566739845718578723752991780479450933062226933214405821496646245529922698796022491842869386929063912643023240255886037300083081924287270928579529854683856606258348659894795385600548076935532924773911628798149369489864551127966476053688950168467105329321528573890756677558840730473814399226391821224828418168683172736893346190879475986763644603930585653833975256154985827713051608783543486459678339917949346989258346472458510903960590953478076895372643668067819860277572896765926295700662936562091620331979983348455969206159854347276688748935245341196421977977237689064852800175257099662844529577471809276989842680605751745669936132324698810671628843482243436693086372924644123476634303909386277449635673567780673413881447730425158941266871194449970225311580356277401842464498916809672901318495152610934082715477344613461040421381558311849813720803228506546895138230785772910512920633293993805872830586831461946676384912239441968293942670798148990270248864156304685112201932290459075210997213229310871949554943507199350247165612510551675061071349273950914401783949748072821803676392892514930386831413416142629859606565822447687426712392395694967494075549393283493636584047298840577347825111731532288153866986515478629807707339827923188918563990167467650796977974852992841645941411074532330956578848661391946237069286638168014108351695638739581095270379268648241155974490693204239872306614694338858087476718401641514778837950852897282217810660684225197609833546978058946609413722846466098816129418762054279220000413178331405325315393671972213283672006526146991111045852303593078870899541165931992752208936260961579291069092912284333983335643985180953053545523703017130254107407323186073370626333784912297557225436621841428658754872819928328618785276581737285224960920975527278644546275003890684078663673251106268459044680375627450160981752701754556344072660319548005723779532373537951141492193837556727002817586932453835568900200283273591386725971504681668337552222981393986133424686054286945370491842602313930678569556782365053895917343130506932395343496178893336938020126796046507476522473113464662831807549482253806963978111521250861747063362419855657065034503268706248989715450675335677563504840802829632215122603886531259691924414670643206501267244663316527573687684395183508426531778177572820354487052147966303180109395369728788113959016604538083223684933312493529793816318765598263628722465622493694318659447476685513237361115788562662808794892673952108677406890922495528087642508562061111071898690752897883135755883309354207883939162880729891934060463849617576588969251309031265145908255097711340928214626514643851779345388971792116486453456984294710262307692432473448879862093677423970789007008903135568563823703450780176931853344190477441142900348805491559555927671951978467554883105881164136465539253333053271519369221069219791013770102523139450126780428677959826308112571617216932770389432521002180906829474590260857165913117617009606448471080424338118417662617537659646213291148535335624056980879005082556296235444080376402097017532902869539596147056737162366099486801308891308550945585287132867219689558606696717923171004763468293778495866224820789554242166773977998410741846424343861718725025155079380365837547690845348164266742682684498009813310544439191862805009779035810579918954097862559444877350235296726147088400288583315702835758280030062966370003070515686058422452013442609933114320246795300007259805491129841771187998279295991050140955216139572308869056006229219881070892333432818987126231034566615258895235729239456527179528408329366849974723915392252834627328437198252443506927630434310987968000237483942998132363142916829403620579804168153826561599884125808627376040358156058439897648562830984628188637538040322776434340582330933318925333520112625540529899855368797537153607602852131054304643612848617008295476540305365875817335572190099044056556795692766803234831407358747336056821672705329401502500970977397047485843252336843308796797710189908996542872674728970110285840659512762357621101471875593343984640511940835258916593071393208594173180441064893119914138721085384898635405694705801623627875102998007766705814619596893676692409150216401076857549267659158573340650298535942493666250838718297807889383083355514411956518471633544640628867225538197042238116305191737942056239355126764266773307340859557175545038951923257712839954306712576450924325307549507605015269383017284963470148017018189011537217903929063719803237571726044896065