Bitmap/Histogram: Difference between revisions

{{trans|Forth}}

<lang PicoLisp>(de histogram (Pgm)

(for L Pgm

(for G L

(inc (nth H (inc G))) ) )

H ) )</lang>

=={{header|PureBasic}}==

Also requires PureBasic solutions for [[Bitmap/Read_a_PPM_file#PureBasic|Read a PPM file]], [[Grayscale_image#PureBasic|Grayscale image]], and [[Bitmap/Write_a_PPM_file#PureBasic|Write a PPM file]].