在racket中将十进制数格式化为字符串,并使用逗号作为十进制分隔符

在racket中将十进制数格式化为字符串,并使用逗号作为十进制分隔符,racket,Racket,racket lang中是否有任何函数提供十进制数到自定义格式字符串的转换 我需要将十进制格式设置为货币样式的字符串格式 示例:值100.1应变为“100,10 CZK”查看~r,了解数字的自定义格式。使用regexp replace将句点替换为逗号 您可以实现以下功能: (define (decimal->string val curr) (let ([lst (regexp-split #rx"\\." (~a val))]) (string-append (ca

racket lang中是否有任何函数提供十进制数到自定义格式字符串的转换

我需要将十进制格式设置为货币样式的字符串格式


示例:值
100.1
应变为“
100,10 CZK”
查看
~r
,了解数字的自定义格式。使用regexp replace将句点替换为逗号


您可以实现以下功能:

(define (decimal->string val curr)
  (let ([lst (regexp-split #rx"\\." (~a val))])
    (string-append
     (car lst) "," (~a (cadr lst) #:min-width 2 #:pad-string "0") " " curr)))
比如说,

> (decimal->string 100.1 "CZK")
"100,10 CZK"

我不知道有球拍/格式模块。它解决了我的问题。