Cody

# Problem 498. Find the Kronecker Tensor Product without using KRON

Solution 293832

Submitted on 1 Aug 2013 by Evan
This solution is locked. To view this solution, you need to provide a solution of the same size or smaller.

### Test Suite

Test Status Code Input and Output
1   Pass
% test for 'KRON' usage fid = fopen(which('mykron'),'r'); c=onCleanup(@()fclose(fid)); tline=fgetl(fid); while ischar(tline) if (strfind(tline,'=kron')>0), error('Don''t use kron'); end if (strfind(tline,' kron')>0), error('Don''t use kron'); end if (strfind(tline,'+kron')>0)|(strfind(tline,'*kron')>0), error('Don''t use kron'); end if (strfind(tline,'-kron')>0), error('Don''t use kron'); end tline = fgetl(fid) end;

tline = xS = size(x); yS = size(y); tline = idr = 1:yS(1):yS(1)*xS(1)+1; tline = idc = 1:yS(2):yS(2)*xS(2)+1; tline = for ii = 1:numel(idr)-1 tline = for jj = 1:numel(idc)-1 tline = M(idr(ii):idr(ii+1)-1,idc(jj):idc(jj+1)-1) = x(ii,jj) * y; tline = end tline = end tline = end tline = '' tline = %This code written by profile_id 3303717 tline = -1

2   Pass
%% test 1 x =1:3; y =2:4; y_correct = [2 3 4 4 6 8 6 9 12]; assert(isequal(mykron(x,y),y_correct))

3   Pass
%% test 2 x = randi(10,3,3); y = 2:4; z_correct = kron(x,y); assert(isequal(mykron(x,y),z_correct))