I have following double summation: ∑10,i=1 ∑i,j=1 (i^5/(10+j^i))

(as seen on this picture Double summation

I am quite lost with this exercise, I tried the following code but I it returns an error although giving me a number - pretty sure it is not correct. Any help is greatly valued!

```
i <- seq(1, 10, 1)
j <- seq(1, i, 1)
denominators <- 10+j^i
fractions <- (i^5)/denominators
sum(fractions)
```

or

```
i = rep(1:10, each=5)
j = rep(i, 10)
# find the sum
sum(i^5/(10+j^i))
```