File:Speckle (simulation).jpg

From Wikimedia Commons, the free media repository
Jump to navigation Jump to search

Original file(1,024 × 1,024 pixels, file size: 114 KB, MIME type: image/jpeg)

Captions

Captions

Add a one-line explanation of what this file represents

Summary

[edit]
Description

Speckle pattern obtained with the following Mathematica code

superficie = Table[0, {1024}, {1024}];
For[i = 85, i ≤ 171, i++,
   For[j = 85, j ≤ 171, j++,
       superficie[[i, j]] = InverseErf[Random[
   Real, {-1, 1}]] + \[ImaginaryI] InverseErf[Random[Real, {-1, 1}]];
       ];
   ]
ListDensityPlot[Abs[Fourier[superficie]], Mesh -> False]
Date 6 April 2007 (original upload date)
Source No machine-readable source provided. Own work assumed (based on copyright claims).
Author No machine-readable author provided. Berto assumed (based on copyright claims).

Licensing

[edit]
Public domain I, the copyright holder of this work, release this work into the public domain. This applies worldwide.
In some countries this may not be legally possible; if so:
I grant anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current08:41, 6 April 2007Thumbnail for version as of 08:41, 6 April 20071,024 × 1,024 (114 KB)Berto (talk | contribs)Speckle pattern obtained with the following Mathematica code superficie = Table[0, {1024}, {1024}]; For[i = 85, i ≤ 171, i++, For[j = 85, j ≤ 171, j++, superficiei, j = InverseErf[Random[ Real, {-1, 1}]] + \[ImaginaryI] InverseEr

There are no pages that use this file.

File usage on other wikis

The following other wikis use this file:

Metadata