判斷一個數(shù)是否是素數(shù)

問題

如題

思路

首先太暴力的就不談饺蔑,會折壽掠河,有一個強偽證的算法(strong liar)Miller Rabin Test蜈垮,思路是這樣(以下p代表某一個大于2的素數(shù)),找到判斷素數(shù)的必要條件菊碟,將多個條件組合起來就能得到近似充分的判斷素數(shù)條件

兩個引理說一下节芥,首先是二次探測定理:如果x2≡1(mod p),那么x≡±1(mod p)逆害,或者說不存在模p等于1下的非平凡平方根(證明:p只有1和p兩個因子的情況下头镊,(x+1)(x-1)≡0(mod p)只可能有x-1=0或x+1=p)

然后是費馬小定理,a和p互質(zhì)(gcd(a,p)=1)時魄幕,ap-1≡1(mod p)

好了開始相艇,對于要判斷的數(shù)P,任取2-p內(nèi)的數(shù)a纯陨,這里我們方便起見取a=2
根據(jù)上述條件坛芽,p-1一定是偶數(shù),可以分解成2r*d的形式翼抠,所以對于a2^r*d ≡1(mod p)咙轩,也就是(a2^(r-1)*d )2≡1(mod p),設(shè)x(n) = (a(2^n*d)) mod p阴颖,那么目前的情況是活喊,我們僅有平凡平方根x(r-1)≡±1(mod p)

這里如果x(r-1)≡1(mod p),問題就變得可遞歸了量愧,因為接下來的方程是a2^(r-1)*d≡1(mod p)钾菊,然后我們可以繼續(xù)往下解xn-1,xn-2...
如果是x(r-1)≡-1(mod p)帅矗,那么問題就更簡單了,因為接下來的解不確定煞烫,不用往下推了

所以從上往下推我們可以看到浑此,對于函數(shù)x的序列,x(r)=1是一定的滞详,而且如果x(t)=-1凛俱,那么x(t+1)到x(r)一定都是1,也就是說茵宪,對于序列中的數(shù)只要判斷兩個條件即可:
1.1之前的數(shù)一定是1或-1
2.最后一個數(shù)一定是1

解決

    public boolean sPrime_RobinMiller(long p) {
        long[] ar = new long[]{2, 3, 5, 7, 11};//if n < 2,152,302,898,747, it is enough to test a = 2, 3, 5, 7, and 11.

        if (p < 4) return p > 1;
        if (p == 5 || p == 7 || p == 11) return true;//a<p-1

        for (long a : ar) {
            long p1 = p - 1, u = p1 & -p1, d = p1 / u, cur = quickPow(a, d, p), prev = cur;
            while (u > 0) {
                cur = prev * prev % p;
                if (cur == 1 && prev != 1 && prev != p1)
                    return false;//序列中最冰,1之前的數(shù)一定是1或者-1
                prev = cur;
                u >>= 1;
            }

            if (cur != 1)
                return false;//序列的最后一個數(shù)一定是1
        }

        return true;//all passed
    }

    private long quickPow(long a, long b, long c) {
        long res = 1;
        for (; b > 0; b >>= 1, a = a*a%c)
            if ((b & 1) == 1) {
                res = res * a % c;
            }
        return res;
    }

Tips

  • 取a=2,3,5,7,11,對于int范圍內(nèi)所有數(shù)(小于2147483648的所有數(shù))都可以判斷出結(jié)果稀火,注意這時需要對3,5,7,11單獨判斷一遍暖哨,因為前提條件是gcd(a,p)=1
  • 并不是所有數(shù)據(jù)類型取long就能判斷出長整型范圍內(nèi)的數(shù)據(jù)了,因為快速冪中需要計算2d mod p凰狞,其中a*a是有可能溢出的

Ref

https://oi-wiki.org/math/prime/
https://zh.wikipedia.org/wiki/%E7%B1%B3%E5%8B%92-%E6%8B%89%E5%AE%BE%E6%A3%80%E9%AA%8C

最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末篇裁,一起剝皮案震驚了整個濱河市,隨后出現(xiàn)的幾起案子赡若,更是在濱河造成了極大的恐慌达布,老刑警劉巖,帶你破解...
    沈念sama閱讀 221,695評論 6 515
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件逾冬,死亡現(xiàn)場離奇詭異黍聂,居然都是意外死亡,警方通過查閱死者的電腦和手機身腻,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 94,569評論 3 399
  • 文/潘曉璐 我一進店門产还,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人嘀趟,你說我怎么就攤上這事脐区。” “怎么了她按?”我有些...
    開封第一講書人閱讀 168,130評論 0 360
  • 文/不壞的土叔 我叫張陵牛隅,是天一觀的道長。 經(jīng)常有香客問我酌泰,道長媒佣,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 59,648評論 1 297
  • 正文 為了忘掉前任陵刹,我火速辦了婚禮丈攒,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘授霸。我一直安慰自己巡验,他們只是感情好,可當我...
    茶點故事閱讀 68,655評論 6 397
  • 文/花漫 我一把揭開白布碘耳。 她就那樣靜靜地躺著显设,像睡著了一般。 火紅的嫁衣襯著肌膚如雪辛辨。 梳的紋絲不亂的頭發(fā)上捕捂,一...
    開封第一講書人閱讀 52,268評論 1 309
  • 那天,我揣著相機與錄音斗搞,去河邊找鬼指攒。 笑死,一個胖子當著我的面吹牛僻焚,可吹牛的內(nèi)容都是我干的允悦。 我是一名探鬼主播,決...
    沈念sama閱讀 40,835評論 3 421
  • 文/蒼蘭香墨 我猛地睜開眼虑啤,長吁一口氣:“原來是場噩夢啊……” “哼隙弛!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起狞山,我...
    開封第一講書人閱讀 39,740評論 0 276
  • 序言:老撾萬榮一對情侶失蹤全闷,失蹤者是張志新(化名)和其女友劉穎,沒想到半個月后萍启,有當?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體总珠,經(jīng)...
    沈念sama閱讀 46,286評論 1 318
  • 正文 獨居荒郊野嶺守林人離奇死亡,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點故事閱讀 38,375評論 3 340
  • 正文 我和宋清朗相戀三年勘纯,在試婚紗的時候發(fā)現(xiàn)自己被綠了局服。 大學(xué)時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點故事閱讀 40,505評論 1 352
  • 序言:一個原本活蹦亂跳的男人離奇死亡屡律,死狀恐怖腌逢,靈堂內(nèi)的尸體忽然破棺而出,到底是詐尸還是另有隱情超埋,我是刑警寧澤搏讶,帶...
    沈念sama閱讀 36,185評論 5 350
  • 正文 年R本政府宣布,位于F島的核電站霍殴,受9級特大地震影響媒惕,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜来庭,卻給世界環(huán)境...
    茶點故事閱讀 41,873評論 3 333
  • 文/蒙蒙 一妒蔚、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧,春花似錦肴盏、人聲如沸科盛。這莊子的主人今日做“春日...
    開封第一講書人閱讀 32,357評論 0 24
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽贞绵。三九已至,卻和暖如春恍飘,著一層夾襖步出監(jiān)牢的瞬間榨崩,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 33,466評論 1 272
  • 我被黑心中介騙來泰國打工章母, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留母蛛,地道東北人。 一個月前我還...
    沈念sama閱讀 48,921評論 3 376
  • 正文 我出身青樓乳怎,卻偏偏與公主長得像彩郊,于是被迫代替她去往敵國和親。 傳聞我的和親對象是個殘疾皇子舞肆,可洞房花燭夜當晚...
    茶點故事閱讀 45,515評論 2 359