枚举"map"变量

Question

我有以下"map"变量:

permutation[100]=-2;
permutation[3]=-1;
permutation[19]=0;
permutation[-20]=1;

是否有办法枚举所有的值?我不关心枚举顺序。我的意思是像这样(不是工作代码):

Do[i+=3,{i,permutation}]

我告诉他们"映射"变量的灵感来自c++。它们的正确名称是什么，才能找到更好的搜索结果?

Answer 1

这是"Meta Mathematica"变量或函数的定义存储在内部，可以使用DownValues提取[]因此，如果您想要定义排列的"输入值"集合，请使用

Cases[DownValues[permutation], permutation[x_] :> x, [Infinity]]

产生

{-20, 3, 19, 100}

耶胡达

Answer 2

你所做的基本上是定义一个离散值的函数。如果您维护一个值列表，您可以这样做:

permutation[100] = -2;
permutation[3] = -1;
permutation[19] = 0;
permutation[-20] = 1;
vals = {100, 3, 19, -20}

的用法如下:

f /@ permutation /@ vals  -> {f[-2], f[-1], f[0], f[1]}

或在循环中…

Do[ Print[permutation[vals[[i]]]], {i, Length[vals]}]

一开始可能有更好的方法来定义数据…

这里有时是一个有用的技巧(仅适用于正参数)

permutation = SparseArray[{}, {200}, Null]
permutation[[100]] = -2;
permutation[[3]] = -1;
permutation[[19]] = 0;
f /@ Select[ permutation, ! (TrueQ[# == Null]) &]
out: {f[-1], f[0], f[-2]}

最简单的方法就是把排列变成一个列表:

permutation={}
AppendTo[permutation,{100,2}]
AppendTo[permutation,{3,-1}]

那么做

 f[#[[2]]]& /@ permutation -> {f[2],f[-1]}