美しい整数の世界 (780レス)
1-

379: 2024/03/04(月)16:54 ID:2kdytQ4B(1/2) AAS
R言語コードのサラダ

> isprime=\(n){
+ pmax=floor(sqrt(n))
+ p=(1:pmax)[-outer(2:pmax,2:pmax)][-1]
+ !any(n%%p==0)
+ }
> isprime=Vectorize(isprime)
> isprime(101:463) |> sum()
[1] 65

実行時間は0.010秒未満
> system.time(isprime(101:463) |> sum())
user system elapsed
0 0 0
>
1-
あと 401 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.005s