求助愚工688先生

重生888

愚工好!

ysr先生帖子有G（6930）=268（对）；用我的方法算，差了将近一倍；用您的方法，也算不出是这么多。不知他的数据是否对？谢谢！

愚工688

真值对！
通常的计算方法得出的计算值会有一些误差的。但是如果误差过大，则表明计算式的精度比较差。

M=?  6930
3463 + 3467 , 3461 + 3469 , 3413 + 3517 , 3391 + 3539， …… , 73 + 6857 , 67 + 6863 , 61 + 6869 , 59 + 6871 , 47 + 6883 , 31 + 6899 , 23 + 6907 , 19 + 6911 , 13 + 6917 ,
S( 6930 )= 268   S1(m)= 259   ,Sp(m)= 246.2714 ,δ(m)=-.081  ,δ1(m)=-.049 ,K(m)= 3.56 ,r= 83
Sp( 6930)=[( 6930/2- 2)/2]*( 2/ 3)*( 4/ 5)*( 6/ 7)*( 10/ 11)*( 11/ 13)*( 15/ 17)*( 17/ 19)*( 21/ 23)*( 27/ 29)*( 29/ 31)*( 35/ 37)*( 39/ 41)*( 41/ 43)*( 45/ 47)*( 51/ 53)*( 57/ 59)*( 59/ 61)*( 65/ 67)*( 69/ 71)*( 71/ 73)*( 77/ 79)*( 81/ 83)= 246.2714

愚工688

真值对！
通常的计算方法得出的计算值会有一些误差的。但是如果误差过大，则表明计算式的精度比较差。

M=?  6930
3463 + 3467 , 3461 + 3469 , 3413 + 3517 , 3391 + 3539， …… , 73 + 6857 , 67 + 6863 , 61 + 6869 , 59 + 6871 , 47 + 6883 , 31 + 6899 , 23 + 6907 , 19 + 6911 , 13 + 6917 ,
S( 6930 )= 268   S1(m)= 259   ,Sp(m)= 246.2714 ,δ(m)=-.081  ,δ1(m)=-.049 ,K(m)= 3.56 ,r= 83
Sp( 6930)=[( 6930/2- 2)/2]*( 2/ 3)*( 4/ 5)*( 6/ 7)*( 10/ 11)*( 11/ 13)*( 15/ 17)*( 17/ 19)*( 21/ 23)*( 27/ 29)*( 29/ 31)*( 35/ 37)*( 39/ 41)*( 41/ 43)*( 45/ 47)*( 51/ 53)*( 57/ 59)*( 59/ 61)*( 65/ 67)*( 69/ 71)*( 71/ 73)*( 77/ 79)*( 81/ 83)= 246.2714

重生888

谢谢愚工先生！
D（6930）=899^2/(0.6*6930)=194         268-194=74       74/268=0.276
我精确数了素数个数是899，(比以前估计精确了),因此与以前和您交流是一样的，最大误差没超30/100.您的公式很好，您的计算精确多了。
另外，我有新型质数表做成的10000以内0+0方法工具，待凉快后，我来实际核对下268的具体情况！谢谢！

愚工688

重生888 发表于 2017-7-17 01:20
谢谢愚工先生！
D（6930）=899^2/(0.6*6930)=194         268-194=74       74/268=0.276
我精确数了素数 ...

你求出来的素数的个数是错误的。【我精确数了素数个数是899】——人工数很容易出错。
π（6930）=890 ，

愚工688

重生888 发表于 2017-7-17 01:20
谢谢愚工先生！
D（6930）=899^2/(0.6*6930)=194         268-194=74       74/268=0.276
我精确数了素数 ...

你求出来的素数的个数是错误的。【我精确数了素数个数是899】——人工数很容易出错。
π（6930）=890 ，

愚工688

我给你一个我编写的可以随意求某区间的素数数量的Basic 程序：

3   OPEN "qusu.txt" FOR APPEND AS #8
4   OPEN "sus.txt" FOR OUTPUT AS #9
5  INPUT " a, b="; a, b
10 s = 0
20 FOR j = a TO b
30 FOR i = 2 TO b ^ (1 / 2)
40 IF INT(j / i) = j / i AND j / i > 1 THEN 70
50 NEXT i
55 PRINT j; ",";
56 PRINT #9, j; ",";
60 s = s + 1
70 NEXT j
80 PRINT TAB(0); "s="; s
86 PRINT #9, TAB(0); "["; a; ","; b; "]: "; "s(x) = "; s
88 PRINT #8, TAB(0); "["; a; ","; b; "]: "; "s(x) = "; s
90 END

其中#8 的输出示例如下：（可以分段的求出[a,b] 内的素数数量）
[ 2 , 1000 ]: s(x) =  168
[ 1000 , 2000 ]: s(x) =  135
[ 2000 , 3000 ]: s(x) =  127
[ 3000 , 5000 ]: s(x) =  239
[ 5000 , 10000 ]: s(x) =  560
[ 2 , 10000 ]: s(x) =  1229

显然：168+135+127+239+560 =1229 ，正确无误。
所求区域的全部素数输出在文本#9：《sus》。