Cody

# Problem 47. Extract leading non-zero digit

Solution 321269

Submitted on 19 Sep 2013 by Marco Castelli
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
%% x = [100 23 -34 0.005 -0.466664 -0.555 1 134534]; y_correct = [1 2 3 5 4 5 1 1]; assert(isequal(leadingDigit(x),y_correct))

z = 100 k = 2 3 k = [] k = [] z = 23 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 z = -34 k = Empty matrix: 1-by-0 k = 1 k = Empty matrix: 1-by-0 z = 0.005 k = 1 3 4 k = Empty matrix: 1-by-0 k = 1 z = -0.46666 k = 2 k = 1 k = 1 z = -0.555 k = 2 k = 1 k = 1 z = 1 k = [] k = [] k = [] z = 134534 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0

2   Pass
%% x = [57 -0.2 8913 -63 0.838127]; y_correct = [5 2 8 6 8]; assert(isequal(leadingDigit(x),y_correct))

z = 57 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 z = -0.2 k = 2 k = 1 k = 1 z = 8913 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 z = -63 k = Empty matrix: 1-by-0 k = 1 k = Empty matrix: 1-by-0 z = 0.83813 k = 1 k = Empty matrix: 1-by-0 k = 1

3   Pass
%% x = [-0.4336 0.3426 3.5784 2.7694 -1.3499]; y_correct = [4 3 3 2 1]; assert(isequal(leadingDigit(x),y_correct))

z = -0.4336 k = 2 k = 1 k = 1 z = 0.3426 k = 1 k = Empty matrix: 1-by-0 k = 1 z = 3.5784 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 k = 2 z = 2.7694 k = Empty matrix: 1-by-0 k = Empty matrix: 1-by-0 k = 2 z = -1.3499 k = Empty matrix: 1-by-0 k = 1 k = 2

4   Pass
%% x = [0.3000 -0.1 -0.00000002 0.5 0.002]; y_correct = [3 1 2 5 2]; assert(isequal(leadingDigit(x),y_correct))

z = 0.3 k = 1 k = Empty matrix: 1-by-0 k = 1 z = -0.1 k = 2 k = 1 k = 1 z = -2e-08 k = 5 k = 1 4 k = Empty matrix: 1-by-0 z = 0.5 k = 1 k = Empty matrix: 1-by-0 k = 1 z = 0.002 k = 1 3 4 k = Empty matrix: 1-by-0 k = 1