r90 hisogram code