関数型プログラミング言語Haskell Part30 [無断転載禁止]©2ch.net

**デフォルトの名無しさん** · 2017/01/15(日) 23:43:54.28

関数型プログラミング言語 Haskell について語るスレです。

haskell.org (公式サイト)
http://www.haskell.org/

前スレ
関数型プログラミング言語Haskell Part28
http://echo.2ch.net/test/read.cgi/tech/1428597032/

**デフォルトの名無しさん** · 2017/09/26(火) 07:51:32.23

訂正
{a, b, c, d}でm=2のときの答えに(:)'e'

**デフォルトの名無しさん** · 2017/09/26(火) 10:27:56.68

>>992
>>993
要素数5でm=3なら、結果の集合の要素数は25ですけど、
その方法で25個すべて出ます？

**デフォルトの名無しさん** · 2017/09/26(火) 10:46:10.91

inter :: a -> [[a]] -> [[[a]]]
inter x = go
where
   go [] = []
   go (y:ys) = ((x:y):ys) : map (y:) (go ys)

part :: Int -> [a] ->[[[a]]]
part _ [] = []
part 1 xs = [[xs]]
part k (x:xs) = map ([x]:) prev_ks ++ concatMap (inter x) ks
where
   prev_ks = part (k-1) xs
   ks = part k xs

main = print $ part 3 [1..4]

**デフォルトの名無しさん** · 2017/09/26(火) 21:54:38.15

>>995
素晴らしいです。

正直 >>992 の時点では意味が分からなかったです。
(答えに (:a)'e' とか)
コード見て意味が分かりました。

**デフォルトの名無しさん** · 2017/09/26(火) 23:41:18.71

n個の異なる要素のリストから[3,3,4,1,8,...]などとサイズ指定リストに従って分割するときの全列挙をするにはどうしますか？

分割はサイズ以外に見分けはつかないものとします

[[a,b,c],[d,e,f]]
と
[[d,e,f],[a,b,c]]はダブルカウントです

**デフォルトの名無しさん** · 2017/09/26(火) 23:55:56.84

分割の言葉のお前の定義からきかせてもらおうか。英語でok

**デフォルトの名無しさん** · 2017/09/27(水) 00:47:00.32

bunkatsu "abcdefghij" [1,2,3,4]
なら
[["a","bc","def","ghij"],...みたいにです

**デフォルトの名無しさん** · 2017/09/27(水) 01:19:52.15

>>999
listl take　自然変換

**1001** · Over 1000

このスレッドは１０００を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。
life time: 254日 1時間 35分 58秒