powered by
utild2filt(d2arr0, d2arr1, outsize = 2, strong = 1)
sigma=outsize*strong
utild1filt
s0<-array(c(1,4,5,8,3), c(6,6)) s1<-array(c(1,1,1,1,1,8,1,1,1,1,1,1), c(5,6)) s0; s1 utild2filt(d2arr0=s0, d2arr1=s1) utild2filt(s0, s1, outsize=1) utild2filt(s0, s1, strong=.2)
Run the code above in your browser using DataLab