Deconvolution/2D+: Difference between revisions

Content added Content deleted
No edit summary
m (→‎{{header|J}}: whitespace)
Line 84: Line 84:
Actually it is a matter of setting up the linear equations and then solving them.
Actually it is a matter of setting up the linear equations and then solving them.


'''Solution''': <lang j>
'''Solution''': <lang j>deconv3 =: 4 : 0
deconv3 =: 4 : 0
sz =. x >:@-&$ y NB. shape of z
sz =. x >:@-&$ y NB. shape of z
poi =. ,<"1 ($y) ,"0/&(,@i.) sz NB. pair of indexes
poi =. ,<"1 ($y) ,"0/&(,@i.) sz NB. pair of indexes
Line 94: Line 93:
)
)
h3 -: g3 deconv3 f3 NB. h3 matches g3 deconv3 f3
h3 -: g3 deconv3 f3 NB. h3 matches g3 deconv3 f3
1</lang>
1
</lang>


=={{header|Ursala}}==
=={{header|Ursala}}==