第七日 第一万零一个素数

前六个素数是: 2, 3, 5, 7, 11, 13, 可以看到第六个素数是13.

问第10001个素数是几?

answer = last $ take 10001 (sieve [2..])
    where sieve (x:xs) = x:(sieve [n|n<-xs,n`mod`x/=0 ] )

是104743, 用的是最原始的筛法,花了我破机器五十秒

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
平台声明:文章内容(如有图片或视频亦包括在内)由作者上传并发布,文章内容仅代表作者本人观点,简书系信息发布平台,仅提供信息存储服务。

推荐阅读更多精彩内容

  • 今天来一条漂亮的小丑鱼! 看着这条鱼,让我想到了海底总动员中的小丑鱼nemo,虽然不太一样,但是一样的可爱不是吗?...
    半糖洛洛阅读 667评论 2 5
  • 这是我自己的心情记录,外加一些旅行建议. 没有详细的计划,这次真是说走就走的旅程,然而路上却遇到更多连去哪儿都不知...
    AlexMadness阅读 286评论 0 0
  • 2016-08-08 幽儿 千里姻缘一线牵SG 现在整容的人太多,爱美之心挡不住。但是整容也要保证健康,不要留下后...
    racelie或sea阅读 367评论 0 2