I'm going to answer your original question, not your current one, which is just one possible solution approach.
There are a number of ways to solve this. One way, like you mentioned in this question, is to convert the incoming list of numbers into strings, then concatenating them:
(require srfi/13)
(define (number-concatenate nums)
(string->number (string-concatenate (map number->string nums))))
Here's another approach, that does not involve conversion to strings first:
(require srfi/1 srfi/26)
(define (number-concatenate nums)
(define (expand num)
(if (< num 10)
(list num)
(unfold-right zero? (cut modulo <> 10) (cut quotient <> 10) num)))
(fold (lambda (num result)
(fold (lambda (digit result)
(+ digit (* result 10)))
result (expand num)))
0 nums))
'(123 45 6)into the number 123456.)