recipsum2.m

来自「实现matlab很多功能的源代码」· M 代码 · 共 9 行

function out = recipsum(x)

recip = reciproc(x);
out = sum(recip);

function output = reciproc(input)
input(find(input==0)) = [];	% Eliminate "0" elements 
output = 1./input;