R Program to find the sum of digits of a number


In this program, You will learn how to find the sum of digits of a number in R.


Sum of digits is : 123 => 1 + 2 + 3 = 6

Example: How to find the sum of digits of a number in R

{
    n = as.integer(readline(prompt = "Enter a number :"))
    s = 0

    while (n > 0) {
      r = n %% 10
      s = s + r
      n = n %/% 10
    }
    print(paste("Sum of the digits is :", s))
}

Output:

Enter a number :213
[1] "Sum of the digits is : 6"