Return to Answer

deleted 1271 characters in body

Source Link

edited Dec 22, 2021 at 23:58

Wolfram Language (Mathematica), 28 bytes

GatherBy[#,i=0;Abs[#-++i]&]&

GroupBy[i=0;Abs[#-++i]&]&

Looser IO format. Input [][array], and outputs an association whose values are the groups (keyed by their displacements).

GatherBy[#,i=0;Abs[#-++i]&]&

GroupBy[i=0;Abs[#-++i]&]&

Looser IO format. Input [][array], and outputs an association whose values are the groups (keyed by their displacements).

GatherBy[#,i=0;Abs[#-++i]&]&

Source Link

created Dec 22, 2021 at 7:44

GatherBy[#,i=0;Abs[#-++i]&]&

GroupBy[i=0;Abs[#-++i]&]&

Looser IO format. Input [][array], and outputs an association whose values are the groups (keyed by their displacements).