尋找雷劈數(shù)

戴公子預(yù)初,看到個(gè)故事:
有位數(shù)學(xué)家卡普利加在一次旅行中吊履,遇到猛烈的暴風(fēng)雨安皱,電閃雷鳴過后,他看到路邊一塊里程碑艇炎,被雷電劈成兩半酌伊,一半上刻著30,另一半刻著25缀踪。這時(shí)居砖,卡普利加的腦際中忽然發(fā)現(xiàn)了一個(gè)絕妙的數(shù)學(xué)關(guān)系——把劈成兩半的數(shù)加起來,再平方驴娃,正好是原來的數(shù)位奏候。除此之外,還有沒有別的數(shù)唇敞,也具有這樣的性質(zhì)呢蔗草?
熟悉速算的人很快就找到了另一個(gè)數(shù):2025 按照第一個(gè)發(fā)現(xiàn)者的名字,這種怪?jǐn)?shù)被命名為“卡普利加數(shù)”厚棵,又稱“雷劈數(shù)”蕉世。
據(jù)說這樣的書有無窮多個(gè),怎么找到他們呢婆硬?
----------------------------------------------------------------------------------------------->
首先想到的是excel,用row()^2奸例,用Log找到結(jié)果是偶數(shù)位的行彬犯,對(duì)半拆開向楼,相加平方后比較,輕松找到十來個(gè)五位數(shù)以內(nèi)的對(duì)劈的雷劈數(shù)谐区。
不過湖蜕,戴公子發(fā)現(xiàn)在excel中公式拖到底運(yùn)算量太大電腦差點(diǎn)死機(jī),總共能算出幾十個(gè)宋列,再多用excel就不行了昭抒。
到此為止已經(jīng)可以證明有無窮多個(gè)雷劈數(shù)了:N個(gè)9,接一個(gè)8炼杖,接N個(gè)0灭返,再接一個(gè)1,肯定是是N+1個(gè)9的平方坤邪。
如果包含非對(duì)劈的熙含,1后面接偶數(shù)個(gè)0的都是。
其實(shí)也不是excel不行艇纺,算法得改進(jìn)怎静,不過要更好解決,還是交給python吧黔衡。
---------------------------------------------------------------------------------------------->

import math
for n in range(1,9):
    L=pow(10,n-1)
    H=pow(10,n)
    for a in range(L,H):
        if a%10 in [0,4,5,8]: #加014569后還是完全平方的數(shù)肯定以0458結(jié)尾
            for b in range(1,H):
                if b%10 in [0,1,4,5,6,9]: # 完全平方數(shù)肯定以0124569結(jié)尾
                    if pow(a+b,2)==a*pow(10,n)+b:
                        print(a,b,a*pow(10,n)+b)

轉(zhuǎn)啊轉(zhuǎn)算出十來個(gè)蚓聘,好像比較慢誒......
作為解釋型語言,python確實(shí)比較慢盟劫,不過...我們有numba!
---------------------------------------------------------------------------------------------->

from numba import jit
import math

@jit(nopython=True,fastmath = True  )
def dai():
    for n in range(1,18):
        L=pow(10,n-1)
        H=pow(10,n)
        for aa in range(L,H,10):
            for k in [0,4,8]: #簡(jiǎn)單分析可知a肯定是048結(jié)尾或粮,運(yùn)算量一下子少了70%
                a=aa+k
                rootp=math.sqrt(H)
                Lb=int(math.sqrt(a)*rootp)-a #關(guān)鍵優(yōu)化2,只需遍歷幾個(gè)可能的b
                Hb=int(math.sqrt(a+1)*rootp)-a+1
                for b in range(Lb,Hb):
                    t1=b%100 #b的結(jié)尾只有幾種可能性捞高,運(yùn)算量再減少近八成
                    t2=pow(a%100 + t1,2)%100 #同余
                    if t1==t2 and (t1 in [1,4,9,16,25,36,49,64,81,0,21,44,69,96,56,89,24,61,41,84,29,76]):
                        if pow(a+b,2)==a*H+b:
                            m=int(n-math.log10(b+1)) #補(bǔ)0氯材,優(yōu)化輸出格式
                            print('a=',a,'\t\tb=',b,'\ta+b=',a+b,'\t\tab=',a,'0'*m,b)

if __name__ == '__main__':
    dai()

結(jié)果是竹筒倒豆子,噼里啪啦輸出一大堆硝岗,速度提高100倍都不止
網(wǎng)上查了一圈氢哮,好多種不同編程語言都有找雷劈數(shù)的代碼,但基本上都是通過第一種算法型檀,找到萬億級(jí)后速度就很慢了冗尤。
利用python的無限制長整型找雷劈數(shù),再用numba優(yōu)化編譯成機(jī)器碼加速胀溺,輕松找到億億億級(jí)雷劈數(shù)裂七。

補(bǔ)充:本來想用取模平方再取模的同余算法優(yōu)化判斷長整型平方效率,debug過程中發(fā)現(xiàn)仓坞,jit后對(duì)大整數(shù)會(huì)溢出背零,好在平方和ab同樣溢出,不影響等值判斷无埃,但沒法用同余算法優(yōu)化徙瓶。

睡一覺起來毛雇,筆記本i7-6700HQ已經(jīng)得到了200來個(gè)對(duì)劈數(shù),最大的是這個(gè)28位數(shù)侦镇,約3809億億億:
ab= 38098433988110 23625494911556

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末灵疮,一起剝皮案震驚了整個(gè)濱河市,隨后出現(xiàn)的幾起案子壳繁,更是在濱河造成了極大的恐慌震捣,老刑警劉巖,帶你破解...
    沈念sama閱讀 219,589評(píng)論 6 508
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件闹炉,死亡現(xiàn)場(chǎng)離奇詭異蒿赢,居然都是意外死亡,警方通過查閱死者的電腦和手機(jī)剩胁,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 93,615評(píng)論 3 396
  • 文/潘曉璐 我一進(jìn)店門诉植,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人昵观,你說我怎么就攤上這事晾腔。” “怎么了啊犬?”我有些...
    開封第一講書人閱讀 165,933評(píng)論 0 356
  • 文/不壞的土叔 我叫張陵灼擂,是天一觀的道長。 經(jīng)常有香客問我觉至,道長剔应,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 58,976評(píng)論 1 295
  • 正文 為了忘掉前任语御,我火速辦了婚禮峻贮,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘应闯。我一直安慰自己纤控,他們只是感情好,可當(dāng)我...
    茶點(diǎn)故事閱讀 67,999評(píng)論 6 393
  • 文/花漫 我一把揭開白布碉纺。 她就那樣靜靜地躺著船万,像睡著了一般。 火紅的嫁衣襯著肌膚如雪骨田。 梳的紋絲不亂的頭發(fā)上耿导,一...
    開封第一講書人閱讀 51,775評(píng)論 1 307
  • 那天,我揣著相機(jī)與錄音态贤,去河邊找鬼舱呻。 笑死,一個(gè)胖子當(dāng)著我的面吹牛抵卫,可吹牛的內(nèi)容都是我干的狮荔。 我是一名探鬼主播胎撇,決...
    沈念sama閱讀 40,474評(píng)論 3 420
  • 文/蒼蘭香墨 我猛地睜開眼介粘,長吁一口氣:“原來是場(chǎng)噩夢(mèng)啊……” “哼殖氏!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起姻采,我...
    開封第一講書人閱讀 39,359評(píng)論 0 276
  • 序言:老撾萬榮一對(duì)情侶失蹤雅采,失蹤者是張志新(化名)和其女友劉穎,沒想到半個(gè)月后慨亲,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體婚瓜,經(jīng)...
    沈念sama閱讀 45,854評(píng)論 1 317
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 38,007評(píng)論 3 338
  • 正文 我和宋清朗相戀三年刑棵,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了巴刻。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點(diǎn)故事閱讀 40,146評(píng)論 1 351
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡蛉签,死狀恐怖胡陪,靈堂內(nèi)的尸體忽然破棺而出,到底是詐尸還是另有隱情碍舍,我是刑警寧澤柠座,帶...
    沈念sama閱讀 35,826評(píng)論 5 346
  • 正文 年R本政府宣布,位于F島的核電站片橡,受9級(jí)特大地震影響妈经,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜捧书,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 41,484評(píng)論 3 331
  • 文/蒙蒙 一吹泡、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧经瓷,春花似錦爆哑、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 32,029評(píng)論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至歪泳,卻和暖如春萝勤,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背呐伞。 一陣腳步聲響...
    開封第一講書人閱讀 33,153評(píng)論 1 272
  • 我被黑心中介騙來泰國打工敌卓, 沒想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留,地道東北人伶氢。 一個(gè)月前我還...
    沈念sama閱讀 48,420評(píng)論 3 373
  • 正文 我出身青樓趟径,卻偏偏與公主長得像瘪吏,于是被迫代替她去往敵國和親。 傳聞我的和親對(duì)象是個(gè)殘疾皇子蜗巧,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 45,107評(píng)論 2 356

推薦閱讀更多精彩內(nèi)容