Cody

# Problem 47. Extract leading non-zero digit

Solution 1944143

Submitted on 20 Sep 2019 by Lap Nguyen
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))

x = 1.0e+05 * 0.0000 0.0002 -0.0003 0.0000 -0.0000 -0.0000 0.0000 1.3453 x = 1.0e+05 * 0.0000 0.0000 -0.0003 0.0000 -0.0000 -0.0000 0.0000 1.3453 x = 1.0e+05 * 0.0000 0.0000 0.0000 0.0000 -0.0000 -0.0000 0.0000 1.3453 x = 1.0e+05 * 0.0000 0.0000 0.0000 0.0001 -0.0000 -0.0000 0.0000 1.3453 x = 1.0e+05 * 0.0000 0.0000 0.0000 0.0001 0.0000 -0.0000 0.0000 1.3453 x = 1 2 3 5 4 5 1 134534 x = 1 2 3 5 4 5 1 134534 x = 1 2 3 5 4 5 1 1

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

x = 1.0e+03 * 0.0050 -0.0002 8.9130 -0.0630 0.0008 x = 1.0e+03 * 0.0050 0.0020 8.9130 -0.0630 0.0008 x = 5.0000 2.0000 8.0000 -63.0000 0.8381 x = 5.0000 2.0000 8.0000 6.0000 0.8381 x = 5 2 8 6 8

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))

x = 4.0000 0.3426 3.5784 2.7694 -1.3499 x = 4.0000 3.0000 3.5784 2.7694 -1.3499 x = 4.0000 3.0000 3.0000 2.7694 -1.3499 x = 4.0000 3.0000 3.0000 2.0000 -1.3499 x = 4 3 3 2 1

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))

x = 3.0000 -0.1000 -0.0000 0.5000 0.0020 x = 3.0000 1.0000 -0.0000 0.5000 0.0020 x = 3.0000 1.0000 2.0000 0.5000 0.0020 x = 3.0000 1.0000 2.0000 5.0000 0.0020 x = 3 1 2 5 2