pgm image lossless compression

I need a suggestion of algorithm can be used to compress pgm images and retrive it back lossless

Answer 1

[Steve Eddins]

Write the image to a PNG file. The PNG format uses lossless compression.

imwrite(A,'myfile.png')

Read it back in using imread.

A_retrieved = imread('myfile.png');