function?Ys=denoising（stt）
col=size（s）;
col=col（12）;
for?i=1:col
????[c（:i）l（:i）]=wavedec（s（:i）tt‘db4‘）;
?????Cs（:i）=c（:i）;
????A（:i）=appcoef（c（:i）l（:i）‘db4‘tt）;
????la=length（appcoef（c（:i）l（:i）‘db4‘tt））;
????
????qq=0;
????for?j=tt:-1:1
????????dd=detcoef（c（:i）l（:i）j）;
????????t（ji）=length（dd）;????????????????%