Another idea is
kr2 =: *&$ ($,) *"0 1"1"1 2
which is not as beautiful but could, in theory, do less work since the
reshape could be done in-place (not supported yet, but will be someday)
Henry Rich
On 10/15/2017 3:08 PM, Cliff Reiter wrote:
I think kr=: [: ,./^:2 */ is what (or close to it) we came up with
then. My retest 18 years later wasn't so good :).
kr=:[:,./ [: ,/"_1 */
I like the expressiveness of Roger's *"0 2
Thanks for the interesting ideas and solutions. Cheers, Cliff
On 10/14/2017 12:36 PM, Roger Hui wrote:
http://code.jsoftware.com/wiki/Essays/Kronecker_Product
Victor Cerovski had the [: ,./^:2 */ expression in 2010-02-26
On Sat, Oct 14, 2017 at 9:30 AM, robert therriault
<[email protected]>
wrote:
Slight variation to Roger (talk about standing on the shoulders of
giants!)
kr=: [: ,./^:2 */
a kr b
2 2 2 3 3 3
2 4 2 3 6 3
2 2 2 3 3 3
5 5 5 7 7 7
5 10 5 7 14 7
5 5 5 7 7 7
Cheers, bob
On Oct 14, 2017, at 9:10 AM, Roger Hui <[email protected]>
wrote:
kr=: [: ,./^:2 *"0 2
a kr b
2 2 2 3 3 3
2 4 2 3 6 3
2 2 2 3 3 3
5 5 5 7 7 7
5 10 5 7 14 7
5 5 5 7 7 7
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
---
This email has been checked for viruses by AVG.
http://www.avg.com
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
