Cody

Solution 288331

Submitted on 24 Jul 2013 by Mehmet OZC
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 = x_new = []; tline = x_full = []; tline = for jdx = 1:size(x,1) tline = for idx = 1:size(x,2) tline = x_new = [x_new repmat(x(jdx,idx),1,length(y))]; tline = end tline = x_full(jdx,:) = x_new; tline = x_new = []; tline = end tline = '' tline = y_new = repmat(y,size(x,1),size(x,2)); tline = z = y_new.*x_full; tline = end tline = '' tline = %This code written by profile_id 3877541 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))