(string->number "albert")
   → #f
(string->number -666)
    → -666
(if (string->number 666) 'YES 'NO)
    → YES