以下を考慮してください(Mathematica 8を使用しています):
mask = DensityPlot[-Exp[-(x^2 + y^2)/5], {x, -4, 4}, {y, -3, 4},
Axes -> None, Frame -> None, Method -> {"ShrinkWrap" -> True},
ColorFunction -> GrayLevel, ImageSize -> 512];
Show[ImageFilter[Mean[Flatten[#]] &, CurrentImage[], 20,
Masking -> mask], ImageSize -> 512]
Can we generate "foveated Image" in Mathematica でSjoerd ソリューションを使用します。
これを動的にしたいと思います。今は写真を撮るだけです。プレゼンテーション中にコンピュータをクラッシュさせずにこれを「ライブ」で動作させる最善の方法は何でしょうか? リフレッシュレートを調整できますか? マスクを操作しますか? 「ビデオモード」を停止して写真を撮りますか?