## Some E3 Test Cases with the correct output.
# Make your own test cases as well, and put them in a separate R script.
# Do not submit your test cases.

> AddToThird(c(1,1,1))
[1] 1 1 2
> AddToThird(c(2,4,5,3,7,1,2))
[1]  2  4  6  3  7 10  2
>
> BiggerPairs(c("hi", "hey", "hello"))
[1] 2
> BiggerPairs(c("hi", "hello", "hey"))
[1] 1
> BiggerPairs(c("longstring", "medium", "tiny"))
[1] 0
>
> ReturnValueTimes(c(2, 4, 3))
[1] "22"   "4444" "333" 
> ReturnValueTimes(c(7, 1))
[1] "7777777" "1"    
>
>
> SumNumbers("45")
[1] 45
> SumNumbers("34 3 100")
[1] 137
>