title: finding the number of significant digits versus digits after decimal in r
body: <p>I would like to find the number of significant digits in a vector of numbers that can have very different scales.</p>
  
  <p>For example, the number 1000 has 1 digit;
  the number 100 also has 1. The number 1300 has 2.</p>
  
  <p>This is not to be confused with the number of digits after decimal, that in both cases is equal to 0.</p>