美しい整数の世界 (780ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

576: 2024/05/08(水)21:09 ID:o+7mX6D2(1/8) AAS
素数を知ったのは確か4歳くらいの時
聡明で美しい数字を想った
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59…
何か法則性は無いのか
すぐ近くに次の素数が現れると思えば
すぐ近くには無かったり
これが3桁4桁5桁となっていくと
省26

---

577: 2024/05/08(水)21:09 ID:o+7mX6D2(2/8) AAS
■R

# 宝の数を変化させる
treasure0 <- function(m=3,n=4,k=2){
y=1:(m*n)
(z=matrix(y,ncol=n,byrow=T))
(P=as.vector(z))
(Q=as.vector(t(z)))
省18

---

578: 2024/05/08(水)21:56 ID:o+7mX6D2(3/8) AAS
重合度nのPVA(ポリビニルアルコール)
があるとする

ここに、
大過剰のホルムアルデヒド(HCHO)
を用いて架橋を行う
即ち、各HCHO分子はPVAの隣り合う
2つのOH基を架橋する
省22

---

579: 2024/05/08(水)22:14 ID:o+7mX6D2(4/8) AAS
最近では、
虚部が小さい方から10兆個までの
複素零点は
すべてリーマン予想を満たすことが
計算されており、
現在までにまだ反例は知られていない

現在では
省10

---

580: 2024/05/08(水)22:16 ID:o+7mX6D2(5/8) AAS
37×3=111
37×6=222
37×9=333
37×12=444
37×15=555
37×18=666
37×21=777
省24

---

581: 2024/05/08(水)22:24 ID:o+7mX6D2(6/8) AAS
■haskellに移植

import Data.List
import Data.List.Split
m = 5 -- 縦マス(短軸）
n = 6 -- 横マス(長軸)
k = 5 -- 宝の数
q = [0..m*n-1]
省19

---

582: 2024/05/08(水)22:25 ID:o+7mX6D2(7/8) AAS
▲

▼

---

583: 2024/05/08(水)22:36 ID:o+7mX6D2(8/8) AAS
> sapply(1:20,function(k) treasure0(4,5,k))
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11]
短軸有利 9 84 463 1776 5076 11249 19797 28057 32243 30095 22749
長軸有利 9 83 453 1753 5075 11353 20057 28400 32528 30250 22803
同等 2 23 224 1316 5353 16158 37666 69513 103189 124411 122408
[,12] [,13] [,14] [,15] [,16] [,17] [,18] [,19] [,20]
短軸有利 13820 6656 2486 695 137 17 1 0 0
省17

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.026s