Tag Info

Hot answers tagged

1

k[{data_, {}}] := {} k[{data_, rulez_}] := k[{Sow@StepNTimes[data, rulez[[1]], 5], Rest@rulez}] Reap@k[{data, {M1, M2}}] (* {{}, {{StepNTimes[data, M1, 5], StepNTimes[StepNTimes[data, M1, 5], M2, 5]}}} *)



Only top voted, non community-wiki answers of a minimum length are eligible