[英]List to string conversion in Racket
如何在 DrRacket 中将列表转换为字符串? 例如,如何将'(红黄蓝绿)转换为“红黄蓝绿”? 我尝试使用 list->string 但这似乎只适用于字符。
这里的技巧是映射作为输入接收到的符号列表,依次将每个符号转换为字符串,注意在每个符号之间添加一个空格,除了最后一个。 像这样的东西:
(define (slist->string slst)
(cond ((empty? slst) "")
((empty? (rest slst)) (symbol->string (first slst)))
(else (string-append (symbol->string (first slst))
" "
(slist->string (rest slst))))))
或者更简单,使用高阶过程:
(define (slist->string slst)
(string-join (map symbol->string slst) " "))
无论哪种方式,它都按预期工作:
(slist->string '(red yellow blue green))
=> "red yellow blue green"
只是为了彻底,如果输入列表是字符串列表(不是问题中的符号),答案将是:
(define strlist (list "red" "yellow" "blue" "green"))
(string-join strlist " ")
=> "red yellow blue green"
Racket 支持许多实用功能,使这变得容易。 如果您只想查看列表中的内容,您可能会对“显示”感到满意。 如果您关心没有括号,您可以使用字符串连接。
#lang racket
(define my-list '(a big dog))
;; the easy way (has parens):
(~a my-list)
;; slightly harder
(string-join (map ~a my-list) " ")
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.