gpt4 book ai didi

wolfram-mathematica - 在 Mathematica 中重新排序列表元素的更好方法

转载 作者:行者123 更新时间:2023-12-01 08:17:01 24 4
gpt4 key购买 nike

我想重新排序 Tally[Characters["2723198931"]] 的结果根据其每个元素的第一个分量,按 lst = {"3", "1", "2", "9"} 的顺序排列.也就是说,我希望输出为 {{{"3", 2}}, {{"1", 2}}, {{"2", 2}}, {{"9", 2}}} .

目前我有一种丑陋的解决方案,但想知道是否有人可以帮助提供一个简洁的解决方案。非常感谢。

最佳答案

一种方式可能是

data = Tally[Characters["2723198931"]];
lst = {"3", "1", "2", "9"};

(*algorithm*)

pos = Position[data[[All, 1]], #] & /@ lst;
Extract[data, pos]

输出
{{{"3", 2}}, {{"1", 2}}, {{"2", 2}}, {{"9", 2}}}

更新 2:37 am

以上屏幕截图,我在 Windows 7 上使用 v 8.04

enter image description here

关于wolfram-mathematica - 在 Mathematica 中重新排序列表元素的更好方法,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/8633109/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com