, - ' ,..､､.ヾ{{フ'⌒`ヽ､
／ ,:', -‐‐` ´ '´⌒ヽ ヾ:､
. ,' ,'´ ,ィ ,ｨ ,' , ｀ヽ', ',-<
,' .i /|. /.| { i, i, }. }_,,）)
! | ! .,'-.{ ! !|; |`､.}ﾞ!.! |. ! ヽ.
', ', |Vｧ=､ﾞ､ ｀ﾞ､!-_:ﾄ,ﾘ', l ! | ﾞ',
ヽ､', l:!Kノ}. f:_.)iﾞi: ﾘ ! l ル
| l!iヽﾞ- ' , .!__:ﾉ ﾞ ,ﾘ l ﾘ'´
. ',|!!､ r‐┐ ｀ ノ'. /,ｲ ／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
'i!ﾞ､ヽ､ ﾞｰ' _, ィ,:',:''´ ＜ Mathematica に関する話題はここに書いてね！
ﾞ:､ｨ､jヾｰ::: 'iﾍ .ノ',ﾘ. ＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
,､- '´ ヽ､ﾞ､ { ｀＞"､
/＼＼ ', } //｀ヽ
過去スレ
〓Mathematica〓
http://science2.2ch.net/test/read.cgi/math/985023298/
〓 Mathematica 2 〓
http://science3.2ch.net/test/read.cgi/math/1078534285/
〓 Mathematica 3 〓
http://science6.2ch.net/test/read.cgi/math/1121413040/
〓 Mathematica 四 〓
http://kamome.2ch.net/test/read.cgi/math/1197270001/ (鯖飛びでログ消滅)
http://mimizun.com/log/2ch/math/1197270001/
〓 Mathematica 5 〓
http://kamome.2ch.net/test/read.cgi/math/1285859504/
いくのに、Ｍａｔｈｅｍａｔｉｃａを立ち上げようとするとエラーが出てアクチベートすらできません。
代理店のヒューリンクス｣に聞いても原因がわからないようです。
うまくいかない場合返金してもらうか、それともアップデートしてもらおうかとも考えているのですが
どんなもんなんでしょう。
つい先ほどヒューリンクスより留守電がありVer.7にダウングレードしてもらえないかと言われました。
なぜダウングレードしなければいけないのか私にはわかりません。もともとVer8にアップグレードする
という契約だったのに…
真摯でしたが、統合されてからは最悪でした(これはあくまで当時)。
Ver.5の頃かな、他社より先にVerUpキャンペーン打って煽りメール、
見積依頼中に、期限を勝手に縮めて、期限切れたから初期費で全額
払えときた～
W社に相談したら、仲介にいってくれたが、H社担当は無視の一辺倒。
結果W社勘案で代理店を変えて、定額でVerUpできた経緯があります。
その後H社担当から、他社並に期限延長したから、買えってメール。
アホだろ｡｡｡
数学板に変なスレ立てんな
Mathematicaは数学を意味するラテン語です。
Isaac Newton:Philosophiae naturalis principia mathematica
Alfred North Whitehead:Principia Mathematica
その後ヒューリンクスからメールが届きました。
内容は
-----------------------------------------------------------------------
今回の問題は、Mathematica8 と日本語OSの問題で現在解決されていません。
そこで、開発元からのご提案として、別なマシンにて試していただくか、
OSをVista または、Windows7 にして、英語版Mathematica8 をご利用いただくか、
Mathematica7にダウングレードして現在のPCにてご利用いただくか、
以上の選択になります。
----------------------------------------------------------------------
どなたかXPSP3(私のマシンのＯＳ）で日本語版Mathematica8を動かしている方は
いらっしゃいませんか？ＯＳのバージョンアップはできかねる状況なので…。
それでいて動かないのかよ！
英語版にしたら？
でも英語版使っても、日本語版との差額はなぜか払わなきゃいけないそうだが、、、。
Ver.4からのアップグレードの特別割引：で税込みで約82000円でした。
すいません。約84000円でした。
日本のウルフラムリサーチにも問い合わせてみようと思います。もともとはウルフラム
からのバージョンアップの勧誘メールが発端になってますから。
そうなんですよね。なんだか詐欺にあったような気分です。消費生活センターにも相談して
みようと思います。
まさかプロ版へのアプグレードが８４０００円？じゃないよね。
HomeEdition版だよね？
どっちにしろ考えられない値段だが、、、
そのまさかのプロ版です。Ver4のころにはHomeEditionなんてありませんでしたから。
Ver.8もPro版です。
へぇ！pro版か。だったら安いかも。
日本にしては間違って安すぎる設定にしちゃったもんだから、
サポートする気がないんだな、きっと。
XP SP2以降はWolframサポート範囲です。
http://www.wolfram.com/mathematica/features/system-requirements.html
>------------------
>今回の問題は、Mathematica8 と日本語OSの問題で現在解決されていません。
>------------------
今回の問題とは何でしょうか？
>>2
日本語版mathematica8が動作しないこと。
仮想マシンのXP SP3がVerが8.0.0.0だわw
とりあえずこれから8.0.1被せて報告する。
ただな、mathpassファイルは調べたかか？
ここにバグがはいると、マニュアルで修正
する必要がある(誤謬項の削除だけだが)。
あとiniファイルだったか、破損していると
起動失敗するよ。
すみません。ありがとうございます。一応カーネルでアクチベートはできたのでカーネルは
動くようになりました。
あとiniファイルとういうのは何ですか。お教えください。
仮想マシンが無茶苦茶重くてインスコ終わらんｗ
アクチできたら、それはそれで良かったですね！
iniファイルについては、当時の状況を記録して
いません。起動時のアラートログを追いかけると、
ファイル(アスキー形式)の中身が途中で破断…
バックアップファイルからカキコ修正しました。
通常iniは初期化のinit.mでしょうが、こいつと
違う(記述が多い)ものでした。
結局、Mathematica8が動くようになるまで、Mathematica7を使うことになりました。まったく
ウルフラムの技術力のなさにはあきれてしまいます。
ところで仮想XPiのほうは動きましたか？XPSP3でもマシンによって動いたり、動かなかったり
するそうですが…(Hulinksの技術担当より）。
結局、mathematicav8日本語版は動かないが、英語版は動くの？
Mathematica8の英語版もそのままでは動かず、いろいろOSをいじってやっと動くという
有様でとても素人が手を出せる代物ではないようです。技術者を派遣して付きっきりで
システムをいじってやっと動かせるようになったそうです。
私のいる四国に技術者を派遣
してもらったりもしくはこちらからマシンを持って東京に行ったりするのは交通費だけでも
大変なのでMathematica7を走らせることにしました。
OSのバージョンアップはコンピュータの
買い替えになってしまうのでこれも大きな出費をともなうのでやめにしました。
8が出てもうだいぶ経つし。
バグフィックスも思うように進まないわけだ。
v4からのバージョンアップなら安いかもしれんが、
そのまま買うなんて個人には無茶な値段設定。
homeeditionも日本ではバカ高いし、、、。
もしかしてhomeeditionv8も動かないの？
きた
大学はたいていどこでも導入してるしまだXP使ってるとこも多いはず。
仮想マシンを、レジュームから起こしたままでしたので、
無茶苦茶重かったですが、8.0.0.0の環境を継承したのか、
アクチの必要はなかったです。
8.0.0.0->8.0.1update memo--------------------------
言語選定ダイアログ:Japanese->ok
インストールダイアログ->次へ
インストール先->次へ
コンポーネントの選択->次へ
スタートメニューフォルダ->次へ
他のアプリケーションを削除->次へ
(デフォルトの前Ver.を削除)
インストール準備完了->インストール
。。。。
インストールを完了します->ok
------------------------------起動&演算にない模様
確認しているかも知れませんが、経験的な補足をあとの
スレに書きます。
本件に関し>>25の指摘は重要です。これは英語版が起動する場合です。
日本版でも英語版は裏でサポートされており、言語チェック？に引っ
かかると、英語版となるようで、一例としてmathpassファイルの破損
です。mathpass位置は同OSでも偏在し、過去の状況も引きずります。
この場合以下を参照し異常《異常定義は難しい》はないでしょうか？
※このファイル内容は個人情報のため、質問にも公開しないように。
Mathematica Helpより------------------------------------------
Mathematica を起動したときに，フロントエンドのアクティベーション
ダイアログボックスが現れた場合，Mathematica がmathpassファイルを
見付けられなかったかmathpassファイルに有効なパスワードが含まれて
いなかったかの可能性がある．この問題を解決するためには，まず
mathpassファイルが$BaseDirectory\Licensing，
$InstallationDirectory\Configuration\Licensing，
$UserBaseDirectory\Licensing
のいずれかのディレクトリにあることを確認する，使用中のマシンで
この中のどの場所にあるかを見付けるためには，ノートブックでコマンド
$BaseDirectory
（または$InstallationDirectoryか$UserBaseDirectory）
を評価するとよい．
これらのどの場所にもmathpassファイルがなかったら，
「シングルマシンパスワードの入力」の手順に従ってパスワードを
再入力する必要がある．
Mathematica8のファイルサイズ4.9GB
倍に増えてるやん!
pdist = PDF[UniformDistribution[{{-a, a}, {-a, a}}], {x, y}]
こうすると正方形になっちゃうし
良い手はありませんかね？
>円上に一様分布する確率関数が欲しいんですけど・・・
俺も
球面上に一様分布するやつが欲しいな
頼む
やぱっりノートパソコンで使いたい。ライセンスを移動する方法ってないの？
Hulinks に「ライセンス移したいんですけど」って連絡すればｵｹ。
エンジニアと参加願います公安はサリンオウム信者の子供を40歳まで社会から隔離している
オウム信者が地方で現在も潜伏している
それは新興宗教を配下としている公安の仕事だ
発案で盗聴器を開発したら霊魂が寄って呼ぶ来た
<電波憑依>
スピリチャル全否定なら江原三輪氏、高橋佳子大川隆法氏は、幻聴で強制入院矛盾する日本宗教と精神科
<コードレス盗聴>
2004既に国民20%被害250～700台数中国工作員3～7000万円2005ソウルコピー2010ソウルイン医者アカギ絡む<盗聴証拠>
今年５月に日本の警視庁防課は被害者SDカード15分を保持した有る国民に出せ!!<創価幹部>
キタオカ1962年東北生は二十代で2人の女性を害して入信した創価本尊はこれだけで潰せる<<<韓国工作員鸛<<<創価公明党 <テロ装置>>東芝部品)>><宗教<<<公安<<魂複<<官憲>日本終Googl検索
Piecewise[{{1/(Pi r^2), x^2 + y^2 <= r^2}}]
>>35
Piecewise[{{1/(4 Pi r^2), x^2 + y^2 + z^2 == r^2}}]
誰か(アメリカ)気づいた
ソウルコピー機器
テロ装置の再読願います
例えば、
perl hoge.pl >fuga.m
MathematicaScript -script fuga.m
とやる代わりに
perl hoge.pl | MathematicaScript
や
MathematicaScript -script <(perl hoge.pl)
とするなど。
後者を試そうとするとGet::noopen: Cannot open /dev/fd/63などと怒られてしまいます。
自己解決しました。
zsh使って
MathematicaScript -script =(perl hoge.pl)
でよいのですね。
2(a+b)とnoteで入力した場合
mathematicaは2×(a+b)と処理しているのかな？
というかしてないと演算結果がおかしいと思う・・
2cなんかも同じで2×c
項としてはっきりさせるには(2(a+b))と入力しないと駄目なのか
In[1]:= FullForm[2(a+b)] == FullForm[(2(a+b))]
Out[1]= True
これを 1 にするにはどうすれば良いの
2(a+b)という表記はmathematicaでは2*(a+b)と同義でそう処理されるようです
ですので
2(a+b)/2(c+d)と(2(a+b))/(2(c+d))はもちろん演算結果が異なります
mathematica v08なんてたくさん放流されてるから使ってみろ
何万も出すなんて馬鹿みたいだし
個人使用目的なら使っても平気だから、どんどん使えｗ
それとバイナリ。
入手できない、インストールできない、設定できないなんて奴はそもそも
タダで使うなんて考えるなｗ
脳みそがないなら金払え。
金も脳みそもないなら人生諦めろ。
ってやつだわな。
今だけ2万5千円くらいで売ってるぞ
知り合いに買ってもらえ
無料で使いこなす奴ってどんな奴なんだ？
あるリストに対して、一番大きい要素が一番右に来るようにrotateさせたいんですが、なにかコマンドはあるのでしょうか？
例えば{0,1,1,3,2,4,2,2,1}を{2,2,1,0,1,1,3,2,4}となるようにしたいんです。
For文使って、一つづつ確かめるということもあるのでしょうが、簡単にやりたいです。
こんなんでどうだろ。
rotatemaxright[lst_] := Which[
Max[lst] == Last[lst], lst,
True, rotatemaxright[RotateRight[lst]]];
Forでなくて再帰使ってるけど。3行で。
{0, 1, 1, 3, 2, 4, 2, 2, 1} //
RotateRight[#, (Length[#] - Max[Position[#, Max[#]]])] &
まぁ、Maxが複数ある場合の多様性は、お題にないからパスです。
でどう？
0, 1, 5, 3, 2, 4, 5, 2, 1} //
RotateRight[#, (Length[#] - Position[#, Max[#]][[1]])] &
効率はどう違うのですか？
Maxが複数あるときうざい
この場合のMaxは、効率の問題ではなく、Positionの
Max(右端)をとるという意味です。その意味でMaxを
使う必要はありません。
ただし[[1]]ですと、listに同じMaxがある場合に、
左端の(Min)が選定されます。
つまり>>63の例{0, 1, 5, 3, 2, 4, 5, 2, 1}では、
右シフトの場合に、右から3番目の5でとまるべき
ですが、それをこえて、Max左側の5まで周って、
{3, 2, 4, 5, 2, 1, 0, 1, 5}
となります。
>>Maxが複数ある場合の多様性は、お題にないから
>>パスです。
と書いたのは、この意味です。
確かに左にシフトすりゃ、Positionで左からの
位置が既知じゃけん、Lengthもいらんばぃ…
じゃが、お題は右シフトじゃけん！つか、その
コードのままだと、マセがゲリピーおこすど！
、
了解しました。
ありがとうございます。
RotateLeft[lst,Last[Flatten[Position[lst,Max[lst]]]]]
ということで
関連して質問です。
{1,4,1,1}と{1,1,4,1},そして{1,1,1,4}は回転させれば同じものなので、{1,1,1,4}に統一したいのですが、
どうすればいいでしょうか？
Sortしちゃいかんの？
RotateLeft[lst,Last[Flatten[Position[lst,Max[lst]]]]]
でok。
もしかしたら、{1,4,1,4,1,1}を上の式に通すと、{1,1,1,4,1,4}
回転させれば同じものになる{4,1,1,1,4,1}を通すと、{1,4,1,1,1,4}
と、異なってしまうが、どちらかに統一されるようにするにはどうすればいいか？
という疑問なのか？
>>72
このlistだとSortでもいいんですが、{1231}と{1321}の場合は分けたいんです。
>>73
その疑問もあります。
最初から具体的に言えば、
{{1, 1, 1, 5}, {1, 1, 2, 4}, {1, 1, 3, 3}, {1, 1, 4, 2}, {1, 1, 5,
1}, {1, 2, 1, 4}, {1, 2, 2, 3}, {1, 2, 3, 2}, {1, 2, 4, 1}, {1, 3,
1, 3}, {1, 3, 2, 2}, {1, 3, 3, 1}, {1, 4, 1, 2}, {1, 4, 2, 1}, {1,
5, 1, 1}, {2, 2, 2, 2}, {2, 2, 3, 1}, {2, 3, 2, 1}}
のlistのうち、回転させて同じものは一つとしてまとめたいと考えていまして、
上手く回転したあと、Unionを適用させようと思っていたのですが、その回転をどうしたらいいのかという疑問と、
僕の知識たらずだけで、そういった回転させて同じものを出すとか検索するといったコマンドがあるのではと思って質問しました。
１．counter=0、「リスト保存庫」のリセット
２．新しいリスト候補(=t0)の作成
３．２で作成したリストを一つ回転させたリスト(=t1)、２つ回転させたリスト(=t2)、
３つ回転させたリスト(=t3)をつくる。（リストの長さ分だけ用意する）
４．リスト保存庫の中に、t0からt4と一致するものがないかチェック
５．４であれば、２へ
６．counterを1増やす。リスト保存庫に２で作成したリストを追加
７．２へ
直裁的なコマンドはあるのかな…しらんばい！
とりあえず速攻版の案です。
list要素の頭を、sublist={a,b,c,d}として、
sublist～Join～sublistでsublist2
{a,b,c,d,a,b,c,d}
をつくる。
後続にsublistをシフトされた{c,d,a,b}があっても、
このパターンはsublist2の中に現れる。
強引ですが、これは例えば、
sublist～Join～sublist /. {___,c,d,a,b,___}
-> True
で検知はできます。
マッチ部分を残して、残りを再帰で呼び出すかな。
Orderlessを拡張した、75指摘のような円順列属性
が設定できれば簡単だけどな…
例えばx=(3^y)coszをz=の式にするにはどうすれば良いでしょうか
→
z == ArcCos[x/3^y] || 3y == 0 && x == 0 && z == ArcCos[Cos[z]]
ありがとうございます。
>>60 の rotatemaxright を使って、
Union[Map[rotatemaxright, lst]]
Union[Map[RotateLeft[#, Last[Flatten[Position[#, Max[#]]]]] &, lst]]
Residue[Series[f[z,q],{q,0,100}],{z,0}] としたいのですが、
Series で出てくるO(q^100) みたいなのが邪魔するようで、Residue を計算してくれないのですが
どうしたらいいでしょうか？
うちでは0って出るけどそれじゃダメなの？
そりは、らんだうのＯだぎゃ～
SeriesのＯはNormal使うぎゃ！
ex.
Residue[Normal[Series[1/(z + q), {q, 0, 10}]], {z, 0}]
ParametricPlot[Cos[t], Sin[t], {t, 0, 2Pi}]
がありますが，媒介変数表示を使わずダイレクトに
x^2 + y^2 == 1 と関数を指定して描く方法はないでしょうか？
円のような単純な形なら媒介変数表示でも問題ないですが
複雑な関数形になるといちいち媒介変数表示に変換するのも大変なので。
ContourPlot で如何
おおベリーサンクス！
Axes->True,Frame->Falseをつけたら完璧になりました。
ありがとうございました！
ランダウの記号（って言うんですね）を除いてコピペしてたので、
その手間がなくなりました！！
ノートで動かす場合は相当ハイスペックじゃないとダメ？
cで言うファイルを選択するダイアログボックスを表示させることはできますか？
>モバイル環境でMathematicaを使いたいのですが、ウルトラブックで動かすのは厳しいですか？
>ノートで動かす場合は相当ハイスペックじゃないとダメ？
MacBookAirで使ってる
快適
r=RandomReal[ { -1 , 1 } , { 100 , 2 } ];
Graphics[Point[r]]
,{n,1,10,1} ]
このように記述しても、nが変化しても、乱数をその都度作成しません
どのようにすればnが１増えるごとに乱数を作成するようにできますか？
っSeedRandom
ありがとうございます
MBAいいな
今、Mathematica Windows版使ってるから、
買い直さなきゃいけないし無理だなぁ
インストーラーあれば入るんじゃない？
TOP カテ一覧 スレ一覧 2ch元 削除依頼 ▲
0.000・・・・・・の不思議 (420)
圏論を小学生にも分かるように説明するスレ (116)
第３種完全楕円積分 (297)
女性初のフィールズ賞受賞者を目指してます！ (129)
０＾０ (156)
■よく話題になる確率の問題を集めてみる■ (226)
--log9.info------------------
ゲイが語る航空・空港 2フライト (334)
ピンク・レディー for GAY 17☆ (943)
小説 中田英子の自分探しの旅 (395)
芳恵「８月１２日は全国一斉の日！」 (755)
☆B.B.倶楽部☆Part.1☆ (845)
プロレスラーとﾊｧﾊｧするｽﾚ Part18 (282)
ゲイが語る日本の財政破綻・ハイパーインフレ (672)
つるの剛士が生理的に受け付けないゲイ (440)
Ｂ型ゲイの部屋よ。Ａ型とはこないでね。 (304)
山田健太の可愛さについて (221)
■ゲイがたびたび、同じ話をするよ。その１３ (792)
【ﾌｧﾝ】柏原芳恵 Vol.1【限定】 (316)
芳恵 わたくしを使った事は一度もありません (653)
誕生日おめでとう (114)
ξ【胸毛】男の体毛4【腹毛】ξ (748)
ネットで見つけたお気に入りの重量系の男part6 (287)
--log55.com------------------
名探偵コナンだ
イナズマイレブンの松野空介さ
【百合】結城友奈は勇者である4.5
幻想郷でゲソ
幻想郷
【バグライブ！】星 空 凛
【game】なな板は組織的抵抗を諦めました【over】
【なりきり】ちょっと助けて！【おそ松さん】