[過去ﾛｸﾞ] 高校数学の質問スレ Part438 (1002ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

600(1): 11/13(水)07:40 ID:mLwXKDzl(1/7) AAS
>>597
Rに移植してみた。
options(digits=22)
re=matrix(nrow=20,ncol=3)
for(n in 1:20){
for(a in 1:3){
re[n,a]=sqrt(2^(4 %% a)*floor((sqrt(2)+1)^(2*n+1)/4)^2 + 2*(1 %% a) * floor((sqrt(2)+1)^(2*n+1)/4) + (1 %% a))
}
}
re
省29

---

601: 11/13(水)08:13 ID:mLwXKDzl(2/7) AAS
>>600
おまけ、Table[x=Floor[(Sqrt[2]+1)^(2n+1)/4];y=Ceiling[(Sqrt[2]+1)^(2n+1)/4];{x,y,Sqrt[x^2+y^2]},{n,1,20}]//Simplify
の方をRに移植。

f=\(n) c(x<-floor((sqrt(2)+1)^(2*n+1)/4),y<-ceiling((sqrt(2)+1)^(2*n+1)/4),sqrt(x^2+y^2))
t(sapply(1:20,f))

[,1] [,2] [,3]
[1,] 3 4 5.00
[2,] 20 21 29.00
[3,] 119 120 169.00
[4,] 696 697 985.00
省17

---

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

---

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

---

ぬこの手 ぬこTOP 1.341s*