タグ付けされた質問 「wolfram-mathematica」

5
MathematicaでWaldoを見つけるにはどうすればよいですか?
これは週末に私を悩ませていました:Waldoのそれらを解決する良い方法は何ですか? [ 北米以外の「ウォーリー」 ] Mathematica(画像処理およびその他の機能)を使用したパズル? これが私がこれまで持ってきたものであり、赤以外の色のいくつかを暗くすることによって視覚的な複雑さを少し軽減する関数です: whereIsWaldo[url_] := Module[{waldo, waldo2, waldoMask}, waldo = Import[url]; waldo2 = Image[ImageData[ waldo] /. {{r_, g_, b_} /; Not[r > .7 && g < .3 && b < .3] :> {0, 0, 0}, {r_, g_, b_} /; (r > .7 && g < .3 && …

1
Mathematicaでカスタム配布のNExpectationを最小化する
これは、6月にさかのぼる以前の質問に関連しています。 Mathematicaでカスタム分布の期待値を計算する 私は@Sasha、過去1年間の多くの回答でによって議論された行に沿って2番目のカスタム分布を使用して定義されたカスタム混合分布を持っています。 分布を定義するコードは次のとおりです。 nDist /: CharacteristicFunction[nDist[a_, b_, m_, s_], t_] := (a b E^(I m t - (s^2 t^2)/2))/((I a + t) (-I b + t)); nDist /: PDF[nDist[a_, b_, m_, s_], x_] := (1/(2*(a + b)))*a* b*(E^(a*(m + (a*s^2)/2 - x))* Erfc[(m + a*s^2 - x)/(Sqrt[2]*s)] + E^(b*(-m …

26
Mathematicaツールバッグには何が入っていますか?[閉まっている]
現在のところ、この質問は、Q&A形式には適していません。私たちは回答が事実、参考文献、専門知識によってサポートされることを期待しますが、この質問はおそらく議論、議論、投票、または拡張された議論を誘います。この質問が改善され、場合によっては再開できると思われる場合は、ヘルプセンターにアクセスしてください。 8年前に閉鎖。 Mathematicaが優れていることは誰もが知っていますが、重要な機能が欠けていることもよくあります。Mathematicaでどのような外部パッケージ/ツール/リソースを使用しますか? 私はこのメインの投稿を編集して(他の人にもそうするように勧めます)、科学研究における一般的な適用性に焦点を当てたリソースを含め、できるだけ多くの人々が役立つと思うようにします。小さなコードスニペット(タイミングルーチンについては以下で説明しました)も含め、何でも自由に投稿してください。 また、Mathematica 7以降の文書化されていない便利な機能はあなた自身が発見したものであるか、またはいくつかの論文/サイトから掘り起こされたものであれば大歓迎です。 何かが素晴らしい理由や、それが提供するユーティリティについての短い説明またはコメントを含めてください。アフィリエイトリンクを使用してAmazonの書籍にリンクする場合は、リンクの後に名前を付けるなどして、そのことを明記してください。 パッケージ: LevelScheme見栄えの良いプロットを作成するMathematicaの機能を大幅に拡張するパッケージです。それ以外の場合は使用せずに、フレーム/軸のティックの大幅に改善された制御に使用します。最新バージョンはSciDrawと呼ばれ、今年中にリリースされる予定です。 David Park's Presentation Package(50米ドル-アップデートは無料) Jeremy MichelsonのgrassmannOpsパッケージは、グラスマン変数と重要でない交換関係を持つ演算子で代数と微積分を行うためのリソースを提供します。 GrassmannAlgebraグラスマン代数とクリフォード代数を扱うためのJohn Brownのパッケージと本。 RISC(Research Institute for Symbolic Computation)には、Mathematica(およびその他の言語)用のさまざまなパッケージがダウンロードできます。特に、Algorithmic Combinatoricsグループのソフトウェアページには、自動化された定理証明のためのTheoremaと、シンボリックな総和、差分方程式などの多数のパッケージがあります。 ツール: MASHは、本質的にMathematica v7のスクリプトサポートを提供するDaniel Reevesの優れたPerlスクリプトです。(Mathematica 8現在-scriptオプションで組み込まれています。) あ alternate Mathematica shellGNUのreadlineの入力で(のpythonを使用して、* NIXのみ) ColourMathsパッケージを使用すると、式の一部を視覚的に選択して操作できます。http://www.dbaileyconsultancy.co.uk/colour_maths/colour_maths.html リソース: Wolfram自身のリポジトリMathSourceは、さまざまなアプリケーション向けの狭いノートブックである場合に非常に役立ちます。また、他のセクションもチェックしてください。 Current Documentation、 Courseware 講義のために、 そしてDemosうまく、デモ、について。 MathematicaのWikibook。 書籍: Mathematicaプログラミング:MathematicaでForループ以外のものを実行したい場合は、Leonid Shifrin(web、pdf)による高度な紹介が必読です。ここで質問にお答えできることをうれしく思います。Leonid James F. FeaginによるMathematicaによる量子法(amazon) スティーブン・ウォルフラム(アマゾン)によるMathematicaブック(web) ショームの概要(アマゾン) …

9
画像から白い背景を削除し、透明にします
Mathematicaで次のことをしようとしています-RMagickは画像から白い背景を取り除き、それを透明にします。 しかし、実際の写真では、(画像の周りにハローがあるように)見栄えが悪くなります。 これまでに試したことは次のとおりです。 unground0[img_] := With[{mask = ChanVeseBinarize[img, TargetColor->{1.,1.,1.}]}, Rasterize[SetAlphaChannel[img, ImageApply[1-#&, mask]], Background->None]]] これがその機能の例です。 元の画像: 白い背景が背景なしで置き換えられた画像(または、ここでのデモンストレーション目的では、ピンクの背景): そのハローを取り除くためのアイデアはありますか?LevelPenaltyのようなものを微調整すると、画像の一部が失われるという犠牲を払ってハローを消すことができるだけです。 編集:バウンティのソリューションを比較できるように、上記のようにソリューションを構成してください。つまり、画像を取得して背景が透明な画像を返す、ungroundという名前の自己完結型関数です。
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.