# 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"
```