RosettaCodeData/Task/Image-noise/Mathematica/image-noise.math
2023-07-01 13:44:08 -04:00

3 lines
145 B
Text

time = AbsoluteTime[]; Animate[
Column[{Row[{"FPS: ", Round[n/(AbsoluteTime[] - time)]}],
RandomImage[1, {320, 240}]}], {n, 1, Infinity, 1}]