function [dof,z] = c_7_p_6_fn_i(x) % x = x(:)'; % x is a row vector [junk,n] = size(x); dof = 3; z = zeros(dof,n); z(1,:) = ones(1,n); z(2,:) = exp( x ); z(3,:) = exp( 2*x );