分块列表排序问题
mathematica吧
全部回复
仅看楼主
level 9
0577216 楼主
比如我希望{1,2,5,3,2,k,d,s,w,4,3,f[y,t],f[y,t],f[x,t],2,2,6,4,y,y,a}变成
{1,2,2,3,5,s,w,3,4,f[x,t],f[y,t],f[y,t],2,2,4,6,a,y,y}
有什么快速的方法？喵呜～～～～～[揉脸]
2013年05月29日 06点05分 1
level 9
0577216 楼主
要求：尽量不明显地使用Head命令
2013年05月29日 06点05分 3
吧务
level 15
xzcyr
……这个到底是什么排序规则？
2013年05月29日 07点05分 4
level 10
mm_酱
？
expr = {1, 2, 5, 3, 2, k, d, s, w, 4, 3, f[y, t], f[y, t], f[x, t], 2, 2, 6, 4, y, y, a};
Flatten[Sort /@ SplitBy[expr, Head]]
2013年05月29日 08点05分 5
1