图片的非线性变换的实验
才疏学浅,难免疏漏,敬请批评指正
对数变换
Clear[a, da, db, b];
a = Import["addA.tif"];
da = ImageData[a];
db = 0.8 Log[1 + da];
b = Image[db];
Grid[{{a, b}}]
效果图
指数变换
Clear[a, da, db, b];
a = Import["wusiA.tif"];
da = ImageData[a];
db = Exp[0.7 da] - 1;
b = Image[db];
Grid[{{a, b}}]
幂函数变换
Clear[a, da, db, b];
a = Import["wusiA.tif"];
da = ImageData[a];
db = 0.5 da^2;
b = Image[db];
Grid[{{a, b}}]
正弦函数
Clear[a, da, db, b];
a = Import["addA.tif"];
da = ImageData[a];
db = 2 Sin[da];
b = Image[db];
Grid[{{a, b}}]
效果图
余弦函数
Clear[a, da, db, b];
a = Import["addA.tif"];
da = ImageData[a];
db = 0.8 Cos[da];
b = Image[db];
Grid[{{a, b}}]
效果图
关于其他非线性函数类似,其中,所有变换中的系数都是可以改变的不同的系数有不同的效果。
使用 mathematica
编程