next up previous
Next: E..5 R,G,B画像の取り出し Up: E. イメージ・ファイルを扱う (工事中) Previous: E..3 グラフィックスの画素値を得る

E..4 カラーをグレースケールに変換

カラー画像をグレースケールにする
In[] := data2 = Table[Table[(Sum[data[[i,j,k]],{k,1,3}])/3,{j,512}],{i,512}];
In[] := gry=Image[data2]

\includegraphics[width=5cm]{eps/lena-gray.eps}


next up previous
Next: E..5 R,G,B画像の取り出し Up: E. イメージ・ファイルを扱う (工事中) Previous: E..3 グラフィックスの画素値を得る
桂田 祐史
2013-04-09