[過去ﾛｸﾞ] 高校数学の質問スレ Part434 (1002ﾚｽ)

高校数学の質問スレ Part434 http://rio2016.5ch.io/test/read.cgi/math/1712376048/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞

---

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

---

225: １３２人目の素数さん [sage] 2024/04/16(火) 10:27:56.91 ID:zrlvndwL 登録すればテキストベースのWolframScriptが使えるので ダウンロードしてインストール Rに移植して遊ぶ 正整数 n を b 進法の数列にして出力するWolframの関数　IntegerDigits Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit) Copyright 1988-2023 Wolfram Research, Inc. In[1]:= IntegerDigits[2024,2] Out[1]= {1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0} IntegerDigitsをRにone-linerとして移植 IntegerDigits=\(n,b) (n%/% (b^(floor(log(n)/log(b)):0))) %% b > IntegerDigits(2024,2) [1] 1 1 1 1 1 1 0 1 0 0 0 再度、RからWolframにone-linerとして再移植 In[2]:= integerdigits[n_,b_] := Table[Mod[e,b],{e, Table[Quotient[n,d],{d,Table[b^c,{c,Reverse[Range[0,Floor[Log[n]/Log[b]]]]}]}] }] In[3]:= integerdigits[2024,2] Out[3]= {1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0} http://rio2016.5ch.io/test/read.cgi/math/1712376048/225

---

ﾒﾓ帳

(0/65535文字)

---

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

---

あと 777 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.009s