pwd f1 = fx(4) f2 = fx(1) xvec = 50+4*randn(100,1); [media, desv] = stat(xvec) fx2 = inline('2*x^2 + 3*x - 5'); argnames(fx2) formula(fx2) fx2(5) fx3 = @(x) 2*x^2 + 3*x - 5 out3 = fx3(5) pa = 3; pb = 3; pc = -5; p = [pa; pb; pc] x = 4 val = fxalt(p,x); disp(val) pa = 2; pb = 3; pc = -5; p = [pa; pb; pc]; fx4 = @(x) fxalt(p,x); fx4(4) n = 6; x = rand(n,1) sumx = zeros(n, 1); sumx(1)= x(1); for i = 2:n sumx(i) = sumx(i-1)+x(i); end sumx delta = 1; while (delta) > 0.05 delta = delta/2; disp(delta); end m = 3; n = 2; H = zeros(m,n); for i = 1:m for j = 1:n H(i, j) = 1/(i+j-1); end end H iter = 1; while iter < 5 disp(iter) iter = iter +1; end n = 0; if -1 > 0 n = 1; elseif 2 > 0 n = 2; elseif 3 > 0 n = 3; else n = 4; end disp(n) A = randn(1) if A>0 disp('A es positivo'); elseif A==0 disp('A es cero'); else disp('A es negativo'); end; A = [1 4 7 2 8 5 2 7 9]'; B = [2 5 1 4 8 0 3 4 3]'; dummy = A>B F = [A B] subF1 = F(A>B,:) % Alternativa 1 subF2 = F(F(:,1)>F(:,2),:) % Alternativa 2