代入法的啟發示搜索
我的代碼實現是：按照自然語言各字母出現頻率的大小從高到低（已經有人作國統計分析了）先生成一張字母出現頻率統計表（A）--------(e),(t,a,o,i,n,s,h,r),(d,l),(c,u,m,w,f,g,y,p,b),(v,k,j,x,q,z)
，再對密文字母計算頻率，并按頻率從高到低生成一張輸入密文字母的統計表（B），通過兩張表的對應關系，不斷用A中的字母去替換B中的字母，搜索不成功時就回退，在這里回朔是一個關鍵。
標簽：
字母
頻率
搜索
代碼
上傳時間：
2015-10-24
上傳用戶：wanqunsheng
％ 文件名：randlsbget.m
％ 程序員:余波
％ 編寫時間:2007.6.25
％ 函數功能: 本函數將完成提取隱秘于上的秘密信息
％ 輸入格式舉例:result=( scover.jpg ,56, secret.txt ,2001)
％ 參數說明:
％ output是信息隱藏后的圖象
％ len_total是秘密信息的長度
％ goalfile是提取出的秘密信息文件
％ key是隨機間隔函數的密鑰
％ result是提取的信息
function result=randlsbget(output,len_total,goalfile,key)
ste_cover=imread(output)
ste_cover=double(ste_cover)
％ 判斷嵌入信息量是否過大
[m,n]=size(ste_cover)
frr=fopen(goalfile, a )
％ p作為信息嵌入位計數器將信息序列寫回文本文件
p=1
％ 調用隨機間隔函數選取像素點
[row,col]=randinterval(ste_cover,len_toal,key)
for i=:len_toal
if bitand(ste_cover(row(i),col(i)),1)==1
fwrite(frr,1, bit1 )
result(p,1)
else
fwrite(frr,0, bit1 )
result(p,1)=0
end
if p==len_total
break
end
p=p+1
end
fclose(frr)
標簽：
randlsbget
result
scover
2007
上傳時間：
2015-11-10
上傳用戶：yzhl1988
