- 944 名前:132人目の素数さん mailto:sage [2025/06/22(日) 11:18:18.20 ID:x1q6L9ud.net]
- Rだと小数に表示なのでMathematicaで計算。
80353937215217784622318561352545314301219984594089748478819 Out[4]= {------------------------------------------------------------, 803469022129495137770981046170581301261101496891396417650688 20088148412335002790621607242593839987034997410025084906975 > ------------------------------------------------------------, 100433627766186892221372630771322662657637687111424552206336 40174538074102937850551109060704760584515594716727372518775 > ------------------------------------------------------------, 200867255532373784442745261542645325315275374222849104412672 20086182069423287937895596774418478938984256623118935282825 > ------------------------------------------------------------, 100433627766186892221372630771322662657637687111424552206336 160682421553118032860967525489926293991268384984698970271425 > ------------------------------------------------------------, 803469022129495137770981046170581301261101496891396417650688 1255310425166894422771138921081126550349948690321031989171 > -----------------------------------------------------------} 12554203470773361527671578846415332832204710888928069025792 In[5]:= N@ans1 Out[5]= {0.100009, 0.200014, 0.200005, 0.199995, 0.199986, 0.0999912} In[6]:= Flatten@Position[ans1,Max[ans1]] Out[6]= {2} In[7]:=
|

|