您的位置:首页 > 其它

图片的非线性变换的实验

2016-03-27 21:51 239 查看

图片的非线性变换的实验

才疏学浅,难免疏漏,敬请批评指正

对数变换

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
编程
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: