[過去ﾛｸﾞ] 高校数学の質問スレ Part434 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
332: 2024/04/19(金)22:17 ID:uW4yUc1h(2/2) AAS
>>326
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= solve[m_,n_] := (a=(m+n+1)/2;
Table[(2b-1)Pi/(m+n),{b,1,Floor[a]-Boole[IntegerQ[a]]}])
In[2]:= solve[20,24]
Pi 3 Pi 5 Pi 7 Pi 9 Pi Pi 13 Pi 15 Pi 17 Pi 19 Pi 21 Pi 23 Pi 25 Pi 27 Pi 29 Pi
Out[2]= {--, ----, ----, ----, ----, --, -----, -----, -----, -----, -----, -----, -----, -----, -----,
44 44 44 44 44 4 44 44 44 44 44 44 44 44 44
31 Pi 3 Pi 35 Pi 37 Pi 39 Pi 41 Pi 43 Pi
省2
333(1): 2024/04/19(金)22:42 ID:VXmOPAjX(2/2) AAS
>>315
をお願いしまする
334(2): 2024/04/20(土)09:06 ID:HVdq8JLd(1/9) AAS
Wolfram言語が話題になっているのに、日本語が通じないとかの罵倒しか書けないクズ人間が東大合格者だと思うひとはその旨をレスしてください。
週末の課題
Wolfram言語でPrimeやPrimeQを使用せずに n 以下の素数を列挙する関数を作れ。
解答例：
R言語での
prime = function(n){
pmax=floor(sqrt(n))
p=(1:pmax)[-outer(2:pmax,2:pmax)][-1]
p1=p[length(p)]+1
f=function(x) all(x%%p!=0)
省22
335(2): 2024/04/20(土)10:51 ID:tXPlmRjn(1/3) AAS
>>333
画像ﾘﾝｸ[png]:i.imgur.com
外部ﾘﾝｸ[pdf]:www.chart.co.jp
より引用
336(2): 2024/04/20(土)11:06 ID:+SMyJsjZ(1/2) AAS
1/(1+tanx)の0からπ/4の定積分の求め方教えてください
337: 2024/04/20(土)11:10 ID:tXPlmRjn(2/3) AAS
>>335
この定義に準拠すると
>>335
x(t) = 1/t
y(t) = t*sin(t)
だが
t→∞のとき x(t)^2+y(t)^2→∞を満たさない。
tが2πの倍数のときは x(t)^2+y(t)^2 = (1/t)^2 + 0
前提を満たさないから漸近線は存在しない。
東大合格者による追加説明や訂正を希望します。
338(1): 2024/04/20(土)11:52 ID:NF26GESG(1/3) AAS
>>334
日本語もろくに使えないアホがwolframとか言ってるのが大変滑稽だという指摘なのにいちいち発狂w
339: 2024/04/20(土)12:23 ID:tXPlmRjn(3/3) AAS
>>338
Phimose草の不等式が発動している。
東大合格者の文字列で発作が起こるらしい。
>336
u=tan(x)とおくとdu/dx=1/cos(x)^2
sin(x)^2+ cos(x)^2=1から
tan(x)^2 + 1 = 1/cos(x)^2 = du/dx
即ち、u^2+1=du/dx
∴dx=1/(u^2+1)*du
∫[0,π/4] 1/(1+tan(x)) dx
省8
340: 2024/04/20(土)12:51 ID:lHPBWyM5(1/2) AAS
東大合格者を否定されて発狂してるのはID:tXPlmRjn尿瓶ジジイだろww
相変わらず日本語通じてないね、チンパン言語？
341(1): 2024/04/20(土)12:59 ID:+SMyJsjZ(2/2) AAS
部分分数分解することは思いつきませんでした。
ありがとうございます。
342: 2024/04/20(土)13:00 ID:HVdq8JLd(2/9) AAS
Wolfram言語はRと同じくリストは１から始まるのでR userには馴染やすい。PythonやCは０から始まる。
Outer関数は引数の順序が変わるが仕様はほぼ同じだったが。
Rでの配列[-i]を実現するにはDropやDeleteではうまくいかず、Complementという関数を見つけて移植できた。
草で終わるという投稿が減ったのもPhimose草の不等式の起源が正しいことを示しているんだろう。
罵倒 ＞ 助言 （Phimose草の不等式）
解説 ： It is as if Mr. Phimose loves to use the expression of 'kusa' that fondles his foreskin too much which has made his hands stink.
343: 2024/04/20(土)13:02 ID:HVdq8JLd(3/9) AAS
>>341
助言されたら、ちゃんとお礼が言える立派な高校生だな。
東大合格しますように。
344(1): 2024/04/20(土)13:43 ID:lHPBWyM5(2/2) AAS
高校生なんて一言も名乗ってないみたいだけど相変わらず独りよがりの統失全開だねw
345: 2024/04/20(土)14:32 ID:K224KWOY(1/2) AAS
>>334
エラトステネスのふるいをそのまま実装すれば次
n=2500;a=Table[i,{i,1,n}];k=1;a[[k]]=0;
While[k*k<=n,k++;While[a[[k]]==0,k++];For[i=2*k,i<=n,i+=k,a[[i]]=0];];
DeleteCases[a,0]
346(1): 2024/04/20(土)15:26 ID:HVdq8JLd(4/9) AAS
>>344
東大合格者なら自分で解けるから、高校生だろうね。
列挙された素数の数すら数えられないようなのは東大不合格者決定。
347(1): 2024/04/20(土)16:00 ID:+Ksmtq1i(1) AAS
>>335
なるほど！
原点からの距離が無限大にならないといけないのですね
348: 2024/04/20(土)16:03 ID:E0eLVNUI(1) AAS
>>346
いくつあるかと列挙しろの違いも分からないチンパンが高校生に講釈垂れてんのかよ？
349(2): 2024/04/20(土)16:47 ID:HVdq8JLd(5/9) AAS
短いだけが取り柄の素数列挙関数（メモリ消費が多大なのはコードが読めればすぐわかるｗ）
primes[n_] := Complement[Range[2,n],Flatten[Outer[Times,Range[2,n],Range[2,n]]]]
n<10000なら実用的な速度で出力された。
350(1): 2024/04/20(土)16:58 ID:NF26GESG(2/3) AAS
>>349
短いって何？
アンタの老い先のこと？
351(1): 2024/04/20(土)16:59 ID:HVdq8JLd(6/9) AAS
>>347
漸近線について深く考えたこともなかったので検索してみて勉強になりました。
昨日の内視鏡検査で小ポリープに遭遇したので
「看護婦さん（高齢者にはこの呼称の方が受けが良い）に近づくわけにはいかないのでポリープに近づきますね」と冗談を言いながら漸近してNBI拡大観察した。
画像で引用した定義だと、
>漸近線を「曲線が,限りなく近づくが,決して交わることのない直線」と定義していないことに注意しておきたい。曲線が漸近線と交わることは許される。
ということらしい。
ナースと交わることは（以下、省略ｗ）
上下前次1-新書関写板覧索設栞歴
あと 651 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.023s