【Lisp】プログラミング言語 Clojure #4【JVM】 [無断転載禁止]©2ch.net (89レス)
上下前次1-新
抽出解除 必死チェッカー(本家) (べ) 自ID レス栞 あぼーん
リロード規制です。10分ほどで解除するので、他のブラウザへ避難してください。
43: デフォルトの名無しさん [sage] 2017/10/31(火) 14:28:53.47 ID:ks1WQGP1(1/2) AAS
Clojure知らんのだけど、CLならこんな書き方も
(defun ochinchin (xs)
(mapcon (lambda (xs &aux (head (first xs)) (tail (rest xs)))
(when (symbolp head)
(list (subseq xs 0 (position-if (lambda (x) (not (numberp x))) tail)))))
xs))
(ochinchin '(A 1 2 3 B 1 2 C 1 2 3 4))
==> ((A 1 2) (B 1) (C 1 2 3 4))
44: デフォルトの名無しさん [sage] 2017/10/31(火) 14:31:35.01 ID:ks1WQGP1(2/2) AAS
失敬、バグってたw
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.013s