Question

我试图将列表嵌入到现有列表中，问题解释如下。

list1的

bla
bla
bla
bla

list2中

useful stuff
is here

当我的函数迭代list1时，它会选择一个随机点，然后插入：

useful stuff
is here

问题是list2现在看起来像：

bla
bla
useful stuff is here
bla
bla

而不是：

bla
bla
useful stuff 
is here
bla
bla

我完全糊涂了，我用Google搜索并阅读了文档，但我找不到答案，我尝试过的所有内容都失败了。

Answer 1

#lang racket
(define list1 '("bla" "bla" "bla" "bla"))
(define list2 '("useful stuff" "is here"))

(define insertion-point (random (length list1)))

(append (take list1 insertion-point)
        list2
        (drop list1 insertion-point))

第一次运行时的结果：

'("bla" "useful stuff" "is here" "bla" "bla" "bla")

Racket / Scheme在现有列表中嵌入列表

1 个答案: