Re: Artistic impression of cloudy structures
- To: mathgroup at smc.vnet.net
- Subject: [mg121594] Re: Artistic impression of cloudy structures
- From: Jacopo Bertolotti <jacopo.bertolotti at gmail.com>
- Date: Wed, 21 Sep 2011 05:34:45 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <201109201010.GAA00795@smc.vnet.net>
For a 2D "lightly cloudy sky" effect you can try something like
skycolor[x_] := RGBColor[x, x, 1];
ListDensityPlot[ BinCounts[Accumulate[RandomReal[{-1, 1}, {100000, 2}]],
1, 1], ColorFunction -> skycolor]
(of course you might want to increase the number of points, zoom on a
dense region and/or change the sizes of the bins)
In principle a generalisation to 3D is straightforward (just generate
triplets of random numbers instead of couples) but I do not know of any
ListDensityPlot3D function in Mathematica so the visualization can prove
tricky.
Regards
Jacopo
On 09/20/2011 12:10 PM, Dimitris Emmanoulopoulos wrote:
> Hello,
>
> I would like to include in a 3D plot (purely for artistic reasons) some weather cloud patterns.
> Is there any way to produce mathematically some sort of realistic 3D cloudy structures?
>
> Thanks a lot,
> Dimitris
>
>
- References:
- Artistic impression of cloudy structures
- From: Dimitris Emmanoulopoulos <demmanoulopoulos@hotmail.com>
- Artistic impression of cloudy structures