Иии

===

пора уже что-то на гитхаб выкладывать)

а кто напишет ana через futu?)

@zerobias

mySum' :: [Int] -> Int mySum' = histo alg where alg = \case Nil -> 0 Cons x (extract -> xs) -> x + xs

?

\case это откуда

LambdaCase

а кто напишет ana через futu?)

Всё как обычно, просто перематываешь время назад?

Всё как обычно, просто перематываешь время назад?

почти) и меняешь свободную комонаду на свободную монаду

ana' :: Corecursive t => (a -> Base t a) -> a -> t ana' f = futu(fmap Pure . f)

http://b-studios.de/assets/guide-to-morphisms.pdf Вот тут хорошо это оформленно,)

http://b-studios.de/assets/guide-to-morphisms.pdf Вот тут хорошо это оформленно,)

кул

баян)

баян)

(

фп вообще баян

расходимся

ок

Ну такое

я по этому наркоманю)) http://comonad.com/reader/2009/recursion-schemes/

поиграем в задачки

дано [1,2,3,4,1,2,4,5,1,2,4] получить [[1,2,3,4],[1,2,4,5],[1,2,4]] найти закономерность и обобщить написавши метод

потом покажу на ката, ана, пара как это делать)

дано [1,2,3,4,1,2,4,5,1,2,4] получить [[1,2,3,4],[1,2,4,5],[1,2,4]] найти закономерность и обобщить написавши метод

take?

нет

тут как бы собираются возрастающие списки

и как только не возрастают, собирается новый

ааа

ааа

решишь?)

не

лень)

слабак)

у меня еще есть задачки)

есть такая задача https://wiki2.org/ru/%D0%A0%D0%B0%D0%B7%D0%B1%D0%B8%D0%B5%D0%BD%D0%B8%D0%B5_%D1%87%D0%B8%D1%81%D0%BB%D0%B0

Я лучше пойду кнопку перекрашу

я вообще ньюфаг, может reduceWhile?

combos(4); // => [[1,1,1,1],[1,1,2],[1,3],[2,2],[4]]

я вообще ньюфаг, может reduceWhile?

пример?

еще задачка

frequency([1,2,1,2,4,2,1]) // => [[1,1],[2,1],[1,2],[2,2],[4,1],[2,3],[1,3]]

skips([1,2,3,4,5,6,7,8,9,10]) // => [[1,2,3,4,5,6,7,8,9,10],[2,4,6,8,10],[3,6,9],[4,8],[5,10],[6],[7],[8],[9],[10]]

?

?

?)

лол

я думал это один и тот же человек

чо нас тут так дофига а приколяхи пишут несколько человек?

я думал это один и тот же человек

я не так давно обратил внимание и у меня такой же вопрос теперь, почему такие ники и все такое?

Какой-то очень сложный прекол

Какой-то очень сложный прекол

это про что

чо нас тут так дофига а приколяхи пишут несколько человек?

просто в (ф|р|фр)п чате задачки не решают, а лифтят в монаду стримы реакт компонентов

примитиф))

frequency([1,2,1,2,4,2,1]) // => [[1,1],[2,1],[1,2],[2,2],[4,1],[2,3],[1,3]]

что это делает вообще

стоить частоту но дискретную

вот 1 оно встретилось 1 раз, дальше 2 - 1 раз, потом 1 уже встретилось 2 раз

и тд

skips([1,2,3,4,5,6,7,8,9,10]) // => [[1,2,3,4,5,6,7,8,9,10],[2,4,6,8,10],[3,6,9],[4,8],[5,10],[6],[7],[8],[9],[10]]

а тут пропускает через один? после [6], [7], [8], [9], [10] не понятно

st = {}; arr.map(x => { if (st[x] !== undefined) { st[x]++; } else { st[x] = 1 }; return [x, st[x]] })

(я мастер фп)

нет не пропускать

а почать срезы по номеру

а тут пропускает через один? после [6], [7], [8], [9], [10] не понятно

каждый 1, каждый 2, каждый 3 и тд

st = {}; arr.map(x => { if (st[x] !== undefined) { st[x]++; } else { st[x] = 1 }; return [x, st[x]] })

что это?

frequency

вроде

frequency

это не в фп

ну это очевидно

ERROR: S client not available

как в фп сделать?

подсказка - свертка

с ней же тоже нужно state отдельно держать

нет

с ней же тоже нужно state отдельно держать

решил?

конечно же нет

показать ответ?

в рамде у редьюса индекса элемента нет что ли ?

addIndex(reduce)((a, v) => ..., init)

дано [1,2,3,4,1,2,4,5,1,2,4] получить [[1,2,3,4],[1,2,4,5],[1,2,4]] найти закономерность и обобщить написавши метод

пытался это запилить

пытаюсь запилить

пытался это запилить

может через рекурсию?) тут параморфизм или же примитивная рекурсия

а как собрать хз

https://goo.gl/mB2vGw

дано [1,2,3,4,1,2,4,5,1,2,4] получить [[1,2,3,4],[1,2,4,5],[1,2,4]] найти закономерность и обобщить написавши метод

оно же просто на части делит

ты накапливаешь до тех пор пока условие выполниво иначе по новому накапливаешь

[].concat.apply([], arr.map((elem, i) => i % 4 ? [] : [arr.slice(i, i + 4)]) мб

ты накапливаешь до тех пор пока условие выполниво иначе по новому накапливаешь

?

frequency https://goo.gl/zTAVff

лол

frequency https://goo.gl/zTAVff

ад

ад

почему?

ща придумаю задачки с комбинаторики

чет я хз как накапливать нормально) https://goo.gl/YQPu2x

чет я хз как накапливать нормально) https://goo.gl/YQPu2x

https://www.webpackbin.com/bins/-KosZf1dW5c2DjNh0k6b

paramorphism

https://www.webpackbin.com/bins/-KosZf1dW5c2DjNh0k6b

?

а на редьюсе можно?))

hylomorphism - папа)