function?p=qq（N）
k=fix（N/2）;
I=eye（k）;
II=fliplr（I）;
if?mod（N2）==0
????p=[Ij*I;II-j*II]/sqrt（2）;
else
????p=[Izeros（k1）j*I;zeros（1k）sqrt（2）zeros（1k）;IIzeros（k1）-j*II]/sqrt（2）;
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????1210??2015-09-06?16:18??新建文件夾\Unitary_esprit.m
?????文件?????????200??2010-07-07?16:47??新建文件夾\qq.m
?????目錄???????????0??2015-09-06?16:19??新建文件夾\